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33 MAINDES-11-D2A08-2 
33 PASE 2 
* i. ABSTRACT 
“3 THIS TEST IS TO BE US BS AN A/D DIAGNOSTIC FOR THE POP- 
a5 uta The abbi-b CNY FRvER. rests BLL boere FUNCTION 4 
“s fue NVERTER, WITH PROVISI TESTING 0 CALIBRATION, 
“5 STEFERENTIAL LINEARITY ANG “RepEATaS LITy as ue ELt. 
> z. REQUIREMENTS 
7S 
=: 2.1 EQUIPMENT 
=. 
=I POP-11 STANDARD COMPUTER 
5: AD01-0 AVD CONVERTER 
3 CALIBRATED OC VOLTAGE SOURCE 
2.2 STORAGE 
5? THE ROUTINE USES MEMORY O TO 16520 
os 
2 3. LOADING PROCEDURE 
ei PROCEDURE FOR NORMAL ABSOLUTE TAPES SHOULD BE FOLLOWED. 
£3 4, STARTING PROCEDURE 
S 
5 4.1 CONTROL SWITCH SETTINGS 
eC BASIC SWITCH REGISTER SETTINGS ARE: 
22 SW15=1 OR UP---HALT ON ERROR 
79 SHi4=1 OR UP---SCOPE LOOP 
71 SW13=1 OR UP---INHIBIT PRINT OUT 
7e SW11=1 OR UP---INHIBIT SUB-PROGRAM ITERATION 
73 SW10=1 OR UP---INHIBIT AVERAGING 
74 =1 OR UP---INHIBIT + OR - 1 LSB TESTING 
5 SuOB=1 OR UP---TEST SIGN OPTION 
22 4.2 STARTING ADDRESSES 
73 200 = NORMAL (WORST CASE) TESTING 
g0 210 = RESTART ADDRESS FOR NORMAL NG 
gi 2e0 = DISPLAY C ION LOOP (IF CPU IS AN 11/05 
Be SA 256 WITH SW10 SET AD} 
es Sa9 = FAST EXTERNAL CONVERSION LOOP 
= 
Es 550 = CONVERSION PRINT LOOP 
et 260 = SINGLE TEST LOOP 
87 270 = MULTIPLEXER CHANNEL AND REPEATABILITY TEST (WAS-IS TEST) 
Be 300 = REPEATABILITY TEST (3 SIGMA SPECIFICATION TEST) 
23 ‘ MAINDEC~11-DZAD8-8 
x PAGE 3 
# 4.3. PROGRAM AND/OR OPERATOR ACTION - 
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Sey su cues (SEE 4.1 AND 5.1) ALL DOWN FOR WORST CASE. 
FRE PROGRAM WILL LOOP AND BELL WILL RING ONCE 

SER PASS OF THE PROGRAM. 

A MINIMUM OF TWO PASSES SHOULD ALWAYS BE RUN. 


OPERATING PROCEDURE 
OPERATIONAL SWITCH SETTINGS 
i.1 AT SA 200 (NORMAL INSTRUCTION TEST)... 
ALL SWITCHES DOWN WILL EXECUTE ALL PORTIONS OF Ls 
a SIC TEST ar DO NOT REQUIRE ries INTERVENT 
A PR AATSUT WILL OCCUR ON ERRORS, re OPE WILL n ite QT 


THE COMPLETION no H PASS. At the <8 
PROGRAM HALTS THREE TIMES: 


wim wn 
© 2 . 
or 


THE TEST, THE 


1ST HALT - LOAD INITIAL es NUMBER (SWO - SWS) 
END HALT - LOAD NUMBER OF C st a TO BE TESTED (SWO - SW6&) 
SRD HALT - SET SR OPTIONS (SEE 4.1 


ALL SWITCHES DOWN AT ALL HALTS IS TAKEN AS WORST CASE TESTING 
ON CHANNEL ZERO. 


$.1.2 AT SA 210 (NORMAL INSTRUCTION TEST RESTART ADDRESS).. 
INSTEAD OF USING inte. Att THIS SA USES THE INFORMATION 
FROM THE PREVIOUS START AT 200. SWITCH OPTIONS MAY BE SET AS 
DESIRED BEFORE STAR TING. 

5.1.3 AT SA 220 (DISPLAY CONVERSION LOOP).. 


WO-SWS SET MUX CHANNEL ON WHICH YOU WISH TO CONVERT 


sie 3H? CAUSES. CONVERTER” TO @ AT -_ RATE FOR 64 


THEN DISPLAY THE RESULTS, ONE AT A 
Bch 


40 MS 
SW1S=1 ihe The, FOR, ABU HALT AFTER EACH CONVERSION WITH THE 
RESULT DISPLAYED IN THE DATA LIGHTS 


THIS ROUTINE WILL NOT RUN ON A PDP-11/0S. USE SA 250 WITH 
SW10 SET TO GET CONVERSION PRINTOUT INSTEAD. 
te lateral 


NOTE: 


S.1.4 AT SA 230 (EXTERNAL CONVERSION LOOP)... 


SWS=1 ts IT ay TO SET EXTERNAL ENABLE TO MAKE 
NO CONVERSION ye 
SW6=1 CAUSES tT TO CONTINUOUSLY RUN RNAL 
CONVERSIONS WITH EXTERNAL ENABLE SET, AND TO 
PRINT OUT WHEN ERROR SETS 


7.752) 22-MAR-7& 10:53 PACE 3 
LUAD PROGRAM INTO MEMORY. 
SET SWITCH REGISTER T0 STARTING AODRESS. 


<“<I—ace 
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DZROBB. Pil 
iSd SW7=1 PREVENTS IT FROM CLEARING DONE AFTER EACH 
152 CONVERSION, TO ALLOW CHECKING THE ERROR FUNCTION 
2 THESE SWITCHES ARE MUTUALLY EXCLUSIVE AND ARE SCANNED IN ORDER. 
2 5.1.5 AT SA 240 (FAST EXTERNAL CONVERSION LOOP)... 
57 SWITCHES 13,14 AND 1S FUNCTION AS IN 4.1 ABOVE. 


wy 
aw 


5.1.6 AT SA 250 (CONVERSION PRINT LOOP)... 


SWO-SWS SET MUX CHANNEL ON WHICH YOU WISH TO CONVERT 
SWE-SW7 SET DESIRED GRIN 
SWid=i INHIBITS AVERAGING 


S.1.7 AT SA 260 (SINGLE TEST LOOP)... 


1ST HALT - LOAD STARTING ADDRESS OF DESIRED TEST 
2@ND HALT - LOAD SR OPTIONS (BIT 11 MUST = 0, HOWEVER) 


5.1.6 AT SA 270 (WAS-IS TEST)... 


SWS=1 CAUSES 8 COMPARISONS ON EACH CHANNEL BEFORE 
e ITCHING CHANNELS 
SW6=1 oauoes A COMPARISON OF INITIAL TABLE AND NEW 
TABLE TO BE PRINTED OUT 
SW7=1 CAUSES WAS-IS COMPARISION OF INITIAL TABLE AND 
NEW TABLE, eT creaee (ote Geom aan 


Grin tofor- Cow 


o 
N 


S 07 
2ND HALT - LORD NUMBER OF CHANNELS TO BE TESTED 
SRO HALT - SET SR OPTIONS 


THE BELL RINGS ONCE AFTER EVERY 4096 PASSES. 

5.1.9 AT SA 300 (REPEATABILITY TEST) 

1ST HALT - LOAD INITIAL CHANNEL (SW 05-00) 

GO WALT ch Ole AIEER OF eels TO G6 TESTED 

= 1 CAUSES PRINTOUT OF EACH DISTRIBUTION 

=1 CAUSES PRINTOUT OF ONLY THOSE via | Ede WHICH FAIL 
te 11-0ZA08-8 

$.2 SUBROUTINE ABSTRACTS 
$.2.1 BEGIN SA 200 
$.2.2 RESTART 210 


§.2.3 SCOPE 


THIS SUBROUTINE CALL IS PLACED BETWEEN EACH SUBTEST IN THE 
INSTRUCTION SECTION. IT RECORDS THE STARTING AODRESS OF EACH 
SUB-TEST AS IT IS BEING ENTERED. IF A SCOPE LOOP IS REQUESTED, 
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| 206 i! Mt ELL JUMP 1 T0 ia START OF THE $ SUBTEST, THAT THE SCOPE LOoP 
E98 ef 2s See EE TOR TE eee OOP SNOT RE UES TED, CHEF EH 
Bs NTEREDS “SWITCH LL ON AL INAIBITS ITERATION OF SUBTESTS. 
| oj By 5.2.4 HLT 
| 
| i 
st; THIS SUBROUTINE PRINTS QUT THE LOCATION COUNTER AT THE TIME OF 
| ais FAILURE. AND THE CONTENTS OF THE PROCESSOR STATUS REGISTER. 
| B16 NOTE THAT IKE LOCATION COUNTER KILL BE THE AOORESS OF THE 
e17 HLT PLUS T 
| 219 MAINDEC-11-DZA0B-8 
! z20 PAGE & | 
 * 5.2.5  TRAPCATCHER 
1 Bau 
| Bs THIS IS A SERIES OF INSTRUCTIONS STARTING AT LOCATION 0 
«BBS DESIGNED TO DETECT AND ISOLATE UNEXPECTED TRAPS AND 
| 557 INTERRUPTS TO THE TRAP AND INTERRUPT VECTOR AREA OF 
«ee MEMORY. 
| EACH VECTOR ENTRANCE ADDRESS IS LOADED WITH THE ADDRESS OF THE 
23] NEXT LOCATION. THE NEXT LOCATION 1S LOADED WITH A HaLT_(o00090).. 
| ez RUS AN ILLEGAL TRAP OR INTERRUPT WELL CAUSE A HALT AT THE T 
ee (OCaTION PLoS thio, 
235 IF A HALT OCCURS IN THE TRAP OR INTERRUPT ARER, EXAMINE REGISTER 
336 SIX, IT WILL CONTAIN THE CURRENT STACK ADDRESS. THE CONTENTS 
537 OF THE CURRENT STACK ADDRESS IS THE VALUE OF THE LOCATION COUNTER 
38 WHEN THE TRAP OR INTERRUPT .CCURRED. 
«BO 5.2.6 CONVERSION AVERAGING 
ee 
543 THIS IS DONE WITH 2 SUBROUTINES, CONAV AND CONVRT, WHICH 
S44 TOGETHER AVERAGE 128 CO ONVERSIONS. SWiO=i INHIBITS 
eu CALLING THESE SUBROUTINE 
E47 5.2.7 DSPLAY (DISPLAY CONVERSION) 
349 
Fi THIS ROUTINE READS THE SWITCH REGISTER FOR CHANNEL AND GAIN, 
35} DOES A CONVERSION CORRESPONDING TO THAT, AND DISPLAYS. THE 
252 ; RESULT IN THE DATA LIGHTS. THUS Cal TBRATIO N CAN BE READILY 
23 , PERFORMED, AND ALL CHANNELS AND GAIN CAN Be CHECKED DIRECTLY. 
2c NOTE THAT THIS ROUTINE WILL NOT RUN ON A POP 11/05. SA 250 (WITH 
2st OOID SET) SHOCLD BE USED TO GET CONVERSTON-PRINTOLT INSTEAD. 
ese 5.2.8 EXTEST (EXTERNAL CONVERSION TEST) 
a) 


r ee ee eee | 


GOl 
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| 262 EVERY TENTH CONVERSION. IT ALSO ALLOWS CHECKING FOR VARIOUS 
| 263 ERROR CASES INVOLVING EXTERNAL CONVERSIONS. 
64 MaINOEC~11-D2F03-3 
! eb 5.2.9 EXFAST (FAST EXTERNAL CONVERSION TEST) 
8 Te ee eine 
289 
| 539 THIS ROUTINE ENABLES EXTERNAL CONVERSIONS AND CHECKS THE ERROR 
271 BIT QFTER EACH. AN ERROR WILL OCCUR nate THE EXTERNAL CONVERSION 
o72 SIGNAL IS OCCURRING FASTER THAN THE MAXIMUM USABLE RATE OF 
es CONVERSION, AND ALLOWS CHECKING THE MAXIMUM POSSIGLE THROUGHPUT. 
Er 5.2.10 FLY (CONVERSION PRINT LOOP) 
| =-_- = 
277 
| eB THIS ROUTINE CONTINUOUSLY PRINTS THE RESULTS OF CONVERSIONS AT 
| 273 THE GAIN AND CHANNEL SET IN THE SWITCHES. THE AVERAGE OF 128 
| psd CONVERSIONS IS PRINTED UNLESS SW10 IS SET, IN WHICH Sse THE 
| 6) RESULTS OF SINGLE CONVERSIONS ARE PRINTED: 
253 5.2.11 TESTX (SINGLE TEST LOOP) 
285 
THIS ROUT WS A SINGLE S TT RUN CONTINUOUSLY FOR 
| ee) Score "LOOP FUREDSES, 2 ita, "SCOPE Loge Eu 1 a Toh A co 
' Bag ; tN CeME ie ees He SUCRE ae ti ah INTERATTTENT FAILURES) uate 
230 EASY TO 00. THIS SUBROUTINE ALLOWS ‘YOU TO LOAD THE OOF 
291 Y TEST FROM TESTO THRU TEST4O AT THE HALT AND THEN GO DIRECTLY 
3 70 THAT TEST. 
ex 5.2.12 WAS-IS (MULTIPLEXER STATUS, SELECTION, AND REPEATABILITY TEST) 
296 
| o7 THIS ROUTINE STORES AN INITIAL CONVERSION VALUE FOR EACH 
298 IN THE INITIAL TABLE (ITABLE). THIS INITIAL VALUE 
299 IS EITHER THE A 9F 128 CONVERSIONS OR THE RE A 
300 SINGLE CONVERSION, DEPENDING ON SWIO. THEN A SINGLE CONVERSION Is 
301 TAKEN ON EACH STORED IN OTABLE (OLD TABLE). FROM 
35 THEN ON, SETS OF ONE CONVERSION FOR ERCH CHANNEL ARE TAKEN AND 
304 FOR + OR - Hes: ACREEMENT _(Ness Su 18 set, N HIGH CR CASE 
305 THEY MUST AGREE EXACTLY) ARE PRINTED 
306 "CHANNEL XX WAS YYYYYY, sz 2 ee FORMAT. AFTER OEE NOMPARISON 
307 OTABLE IS UPDATED WITH'N THE PROCESS IS REPEATED. 
308 re t g co MADE ON CHANNEL BEF 


HANNEL SPRINTED 00 IS SET 

NTABLE IS PRINTED oul, WHICH ALLOWS 

fe ie EEK ED. IF SW? 7 Js arrest 1S’ COMP: : WITH 
: NSTEAD OF OTABLE. LL’Is TABLE AP TER EVERY 
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§.2.13 


§.3 
§.3.1 


$.3.2 


§.3.3 


HO1 


SIGMAL (REPEATABILITY SPECIFICATION TEST) 


THIS eeu Ne TESTS PEPeRTAgiuryy "9 ee ote o THE CHANNELS 
DESIRED AT GAINS OF 4 AND 8. TEN THOUSAND CONV 

TAKEN AT That” GAIN. THE see git teat ies HAVE BEEN INTERPRETED 
TO_MEAN THAT 35 td ad a OUT OF THE TEN iy AND MAY BE 
OUTSIDE OF 2 STATES AT A GAIN OF 4, AND THAT 35 CONVERSIONS 

OUT OF TEN THOUSAND NAY BE OUTSIDE’OF 3 STATES AT A GAIN OF 8. 


AT A GAIN OF 4. THE FIRST 128 CONVERSIONS ARE AVERAGED. THEN 
TEN THOUSAND con NVERSIONS ARE MADE, AND EACH IS COMPARED TO THE 
pence 15 : S THAN b 10, THE SWE SCROERS TS, i MENTED. IF IT 
1 Ane cote FRAN THE AVERAGE “OvER" IS THCRENENT ; 
FBRTHER FROM THE AVERAGE THAN ONE COUNT, "OUT" IS INCREMENTED. AT 
THE END OF THE TEN SEOUSAND c CONVERSIONS 8 CHECK 15 MADE TO 
DETERMINE THE z ALLOWED STATES (EITHER EQUAL AND OVER OR 

UAL AND UNDER) + att TOTAL FOR THE OTHER STATE (EITHER 


NON-ALLOWED STATE. 


AT A GAIN OF 8, THE FIRST 128 CONVERSIONS ARE AVERAGED. THEN TEN 
THOUSAND CONVERSIONS ARE MADE, AND EACH IS COMPARED TO THE AVERAGE. 
IF IT IS WITHIN PLUS OR MINUS ONE OF THE AVERAGE 
IS_INCR a IF NOT We IS INCREMENTED. AT THE END OF 
TEN THOUSAND CONVERSIONS MORE THAN 35 WERE OUTSIDE OF THE 3 
ALLOWED STATES ote isi talisn tT THE DISTRIBUTION one OUT WITH 
SW6 OR SW7 UP IS SIMPLY THE NUMBER THAT WERE WITHIN THE 3 STATES 
AND THE NUMBER OUTSIDE OF 3 STATES. 


5 MAINDEC-11-DZADB-B 
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PROGRAM AND/OR OPERATOR ACTION 


LOADING AND STARTING AT 200 WITH ALL SWITCHES DOWN IS WORST 
case TESTING. IF AN ERROR IS DETECTED HERE, THE 
BE A PRINTOU T WHEN AN ERROR 


TO SCOPE ON IT, PLACE SWIS UP TO HALT ON ERROR, THEN SW14 UP 
TO LOOP ON ERROR THEN SW13 UP TO DELETE PRINTOUTS. 


TO GO DIRECTLY TO A SINGLE SUBTEST AND RUN IT CONTINUOUSLY 

USE SA 260. INPUT PG 2 TRING ADDRESS OF THE pesthen Tee! 
(I.E. THE ADDRESS OF CORRESPONDING TESTXX TAG) 

INITIAL HALT AND CONTINUE. PUTTING SWITCH 11 UP RESTORES 
NORMAL PROGRAM FLOW THROUGH ALL THE SUBTESTS. 


TO CHECK THE SIGN OPTION, SET SW8=1 DURING THE BASIC TEST 
(SA 200) AND INPUT POSITIVE OR NEGATIVE VOLTAGES AS DIRECTED. 


oOo 
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| DZAD 
374 
375 5.3.4 10 CALIBRATE THE CONVERTER GND CHECK CHANNELS AND GAIN 
378 DIRECTLY USE E ih ee 0 (DISPLAY CONVERSION LOOE aITH CALIBRATE - 
a RE VOLT RME A BOURCE AE SMe COU TREN. bi/05, USE B60 
| 389 
Poa 5.3.5 10 CHECK FOR NOISE AND DRIFT ON VARIOUS CHANNELS, USE SA 270 
| 385 (WAS-IS TEST) WITH A OC VOLTAGE SOURCE TO EACH CHANNEL BEING 
393 STED. AT THE FIRST HALT, INPUT THE LOWEST CHANNEL NUMBER OF 
284 OSE YOU WISH TO TEST th H duae -SwO0, AND THE GAIN SETTING AT 
38s WHICH YOU WISH TO TEST THEM IN SWO7-SWOb. THE SECOND HALT 
356 LOAD IN THE NUMBER OF CHANNELS YOU WISH TO Test (ZERO WILL BE 
387 TAKEN AS ONE). AT THE THIRD HALT, N THE SWITCH REGISTER 
388 OPTIONS AS DESIRED. FT CAN BE’ TESTED BY RUNNING THE TEST AS 
| 389 LONG AS DESIRED (WITH SW13 SET 10. INHIBIT PRINTOUTS IF DESIRED) 
| 399 AND THEN SETTING SWO6 TO ZERO. THIS CAUSES A COMPARISON OF THE 
! $31 INITIAL VALUES AND CURRENT VALUES TO BE PRINTED OUT. 
393 5.3.6 TO CHECK NOISE STATISTICALLY, USE SA 300 (REPEATABILITY TEST) WITH A 
394 DC VOLTAGE ON EACH CHANNEL BEING TESTED. AT THE FIRST HALT, SET 
| 395 THE INITIAL CHANNEL NUMBER 0 BE TESTED vine SHOS-5 swoo. ATT 
& a ES 
| . 398 sPeci TCRTION FO FOR f REPERTHB ABILITY 9 Ste ARG RE OLITRE RES 
399 THE INPUT WITH AN aN INE 
| 4090 OTHER THAN GROUND moter OKED. BY SETTING 
 -4Ol SWé TO ONE, EACH RD, ENVIRON IS PRIN TS CAN BE USED 
4p AS AN INDICATION OF NOISE IRREGA F THE Test PASSING OR 
403 FAILING. AN EXPLANATION OF THE BRTNTOUT IS GIVEN IN S.2.13. 
, 405 MAINDEC-11-DZADB-8 
/  ¥OB PAGE 10 
407 
408 b. ERRORS 
499 
410 6.1 ERROR PRINTOUT 
412 6.1.1 STANDARD PRINTOUT 
414 PRINTOUTS ARE BNA Q agH0-WORD FORMAT. THE FIRST IS THE PC+2 
41S OF THE DET SECOND IS THE CONTENTS OF THE 
tig PROCESSOR STATUS REGISTER WHEN THE ERROR WAS DETECTED. 
Hig 6.1.2 GAIN LINEARITY 
459 THE LAST SUBTEST IN THE BASIC INSTRUCTION | TEST Is. FOR 
a5 Oren an ae ities T * D TS BAS ror cone 
s Sine a OFFERS the Hien at wee cH “lh Soy a TESTING, 
4o4 GAIN OF 8 Hus TBE WIT + OR - 1 da LSB OF 
4 THe act TUL VoL TAGE INPUT. | A ANY QTHER GAIN, THE VALUE RE 
4 MUST 0 BE WITHIN + YL AND OF” OURSE 1 LSB HAS 
457 A DIFFERENT VOLTAGE EQUIVALENT “aT EACH GAIN. A ROUTINE IS 
458 USED TO DETERMINE MAXIMUM AND MINIMUM AC LOWABLE VALUES AT 


429 GRINS OF 4,2, AND 1 GIVEN THE VALUE READ AT A GAIN OF 8. 


- ~———— ee 
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IF_AN ERROR 1s DETECTED, THE MESSAGE “GAIN NOT LINEAR 
ITH IN + OR- LSB’’IS PRINTED OUT. THIS IS FOLLOWED BY A 
TABLE WHICH oives Nhe VALUES READ, AND THE MAXIMUM AND MINIMUM 
ALLOWABLE VALUES AT EACH GAIN. 
6.1.3 CH XX WAS YYYYYY, IS 222222 
THIS ERROR MESSAGE IS PRINTED OUT BY THE MULTIPLEXER 
STATUS SELECTION AND REPEATABILITY TEST. IT INDICATES 
AILURE OF 2 CONSE CUTIVE CONVERSIONS ON A GIVEN CHANNEL 
Con GF THE INITIAL BLUE AND THE CU RRENT VALUE TF SH? IS 
SET) 10 BE WITHIN + OR - COR TO BE EQUA L IF SW9 
IS SET). XX IS THE CHANNEL ‘HUGE, Y IS THE RESULT OF 
THE PREVI ous CONVERSION, AND Z HE RESULT OF THE CURRENT 
CONVERSION. ALL NUMBERS ARE P én! in OE TaE 
6.2 ERROR RECOVERY 


IN GENERAL, TEST FAILURES WILL PRINTOUT AN ERROR MESSAGE 
AND CONTINUE. IF THE “HALT ON ERROR” SWITCH IS SET. HITTING 


R HE PROGR 
BE RESTA THE PROGRAM HALTS IN THE MAIN FLOW, 
CONSULT THE CTSTING IF NO MESSAGE IS TYPED OUT. 


MAINDEC-11-DZADB-8 
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, RESTRICTIONS 
| STARTING PROCEDURE 
NONE 
7.2 OPERATIONAL RESTRICTIONS 
7.2.1 BASIC TEST (SA200) 
A CONSTANT DC VOLTAGE SHOULD BE APPLIED TO THE LOWEST CHANNEL TO 
BE TESTED. THIS VOLTAGE SHOULD BE NOT TER 
VOLTS IN MAGNITUDE. NO EXTERNAL TRIGGER SIGNAL SHOULD BE PRESENT. 
7.2.2 DISPLAY CONVERSION TEST (SA 220) 


THIS ROUTINE CANNOT BE USED ON A PDP 11/05. USE SA 250 
(WITH SWIO SET) TO GET A CONVERSION PRINTOUT INSTEAD. 


7.2.3 EXTERNAL CONVERSION TEST (SA230) 
AN EXTERNAL TRIGGER SIGNAL SHOULD BE SUPPLIED. 
7.2.4 FAST EXTERNAL CONVERSION LOOP (SA240) 
i GENERATOR IS NEEDED TO PROVIDE A RAPID EXTERNAL TRIGGER 


eee ae eee. ee ee ee SS 
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486 
m, 14 7.2.5 MULTIPLEXER TEST ($9270) 
489 A CONSTANT DC VOLTAGE SHOULD BE APPLIED TO EACH CHPNNEL 
430 BEING TESTED. 
ia 7.2.6 REPEATABILITY TEST (SA 300) 
494 A CONSTANT DC VOLTAGE SHOULD BE APPLIED TO EACH CHANNEL BEING 
495 TESTED. TO TEST THE CONVERTER TO SPECIFICATION, THE INPUT MUST 


456 BE THE CONVERTER GROUND. 
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8.2 


8.3 


10. 
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MISCELLANEOUS 

EXECUTION TIME 

EACH PASS TAKES ABOUT 30 SECONDS. 

TESTING SYSTEMS WITH MORE THAN ONE ADO1-D 


BY SUBSTITUTING ie i ‘abe: ADCS AND a Vy 

BP3 OF OF THE CSR per Ot 8 SonY ER 78 mitts 

NON-STANDARD RODRESS. aN SUBSTITUTING ITS RTERRLPT VECTOR 
pote RL AN ADO1-D MAY BE TESTED AT ANY ADDRESS 


SPECIAL NOTES ON EXTERNALLY TRIGGERED CONVERSIONS 


IF AS ait con RSIONS HAVE BEEN ENABLED ONE om CHANGE THE 
CHANNEL NUMBER WITHOUT A Li A URRING. HAIL vores” OS 


: ER. RESU 
WILL OF COURSE BE ERRONEOUS. BUT THE Bot aR BIT WILL NOT BE 
SET. THUS IT'S 9 GOOD PRACTICE TO CHANGE CHANNELS. OR GAIN 
ONLY WHEN YOU KNOW NO SIGNAL IS COMING IN (SUCH AS RIGHT 

FTER A CONVERSION HAS SET DONE) OR ELSE TO DISCARD THE FIRST 
CONVERSION AFTER YOU CHANGE CHANNEL AND GAIN. 


NOTE ALSO THAT WHETHER OR NOT A DATO OR DATOB TO THE HIGH 
BYTE CAUSES A CONVERSION DEPENDS ON THE STATE OF EXTERNAL 
ENABLE BEFORE THE DATO INSTEAD OF THE STATE RESULTING FROM 
THE DATO. 

PROGRAM DESCRIPTION 

THIS SET OF TESTS IS DESIGNED TO TEST ALL OPERATIONS OF THE 
ADO1-D CONVERTER, WITH THE NECESSARY EXCEPTION THAT TIMING 

N MO ONLY PARTIALLY TESTED. THE SEVERAL MODES OF 


I ST CASES IS 
OPERATING THE CONVERTER EXTEND THE USEFULNESS OF THE DEVICE 
AND THE COMPLEXITY OF THE DIAGNOSTIC. Cnkine iScRaTOR 


E REPERTOIRE OF DESIGNED TO GIVE T 
OPERATOR MAXIMUM FLEXIBILITY IK CALIBRATION, CHECKOUT, AND 
FRILURE LOCATION. 

LISTING 


SEE FOLLOWING PAGES. 
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sS1 sDIAGNOSTIC FOR THE ADDI-D A/D CONVERTER 
ss2 :COPYRIGHT 197 0, 1971, 1973, DIGITAL EGATPMENT CORP., MAYNARD, MASS. C1754 
553 :BY RICK FA ABBEN 
és :STARTING ADDRESSES ARE: 
4 :200 = NORRAL | (WORST CASE) TESTING 
oo? ?210 = RESTART ADDRESS FOR NORMAL TESTING 
cte 320 = EY CONVERSION LOOP (IF CPU IS A PDP 11/05, 
553 : USE SA 250 (WITH guid SET) INSTEAD) 
61 :230 = EXTERNAL CONVERSION LOOP 
562 240 = FAST EXTERNAL CONVERSION LOOP 
563 3250 = CONVERSION PRINT LO 
564 0 = SINGLE TEST LOOP 
és :270 = MULTIPLEXOR BH ANNEL AND REPEATABILITY TEST (WAS-IS TEST) 
=e :300 = REPEATABILITY TEST (3 SIGMA) 
3) :BASIC SWITCH REGISTER SETTINGS ARE: 
3) -SWiS=1 OR UP---HALT ON ERROR 
579 ; ) :SW14=1 OR UP--- 
57; :SW13=1 OR UP---INHIBIT PRINT OUT 
572 :SWil=1 OR UP=--INHIBIT SUB-PROGRAM ITERATION 
573 ;SW10=1 OR UP---INHIBIT AVERAGING 
574 :SWO9=1 OR UP=--INHIBIT + OR - 1 LSB TESTING 

5 575 :SWO8=1 OR UP---TEST SIGN OPTION 
577 sNORMAL TESTING (SA200) HALTS 3 TIMES AT START OF PROGRAM 
£72 :1ST HALT - LOAD INITIAL CHANNEL NUMBE 
579 *2ND HALT - LOAD NUMBER OF CHANNELS TO BE TESTED 
560 :3RD HALT - SET SR OPTIONS 
£32 :DISPLAY CONVERSION LOOP HAS SEPARATE SR SETTINGS: 
583 ; SHO SWS SET MUX CHANNEL ON WHICH YOU WISH TO CONVERT 
=95 :SW5-SW7 SET DESIRED GAIN 
Ses *SW14=1 CAUSES CONVERTER TO GO AT MAX RATE FOR 109(8) CONVERSIONS 
586 *AND THEN DISPLAY THE RESULTS, ONE AT TIME, FOR ABOUT 40 MS. EACH 
567 *SW1S=1 CAUSES A HALT AFTER EACH CONVERSION WITH THE RESULTS DISPLAYED 
553 THESE SWITCHES ARE SCANNED DURING EACH CYCLE 
590 sEXTERNAL CONVERSION LOOP HAS 3 SPECIAL SR SETTINGS: 
£91 ;SWS=1 CA USES TT 10 Not SET EXTERNAL ENABLE, 10 MAKE 
592 CERTAIN THAT NO CONVERSIONS OCCUR 
E93 ;SWo=1 cAUSES IT 1 CONTINUOUSLY RUN Int ERNAL CONVERSIONS WITH 
Eo4 % LE SET, AND TO PRINTOUT WHEN ERROR SETS 
eos :SW7=1 PREVENTS IT FROM CLEARING DONE’ Bi TEP\ EACH CONVERSION, TO 
Es ALLOW CHECKING THE ERROR FUNCTION ‘ 

' 9 ;FAST EXTERNAL CONVERSION LOOP 
P23 “SWITCHES 13,14,AND 15 ARE USED AS IN He: BASIC SETTINGS 
£01 ; CONVERSION PRINT LOOP 


i "et MUX CHANNEL ON WHICH -YOU WISH TO CONVERT 
ED GAIN 


; SW DESIR 
:SU10=0 CAUSES AVERAGE OF 128 CONVERSIONS TO BE PRINTED 
ies 1 CAUSES INDIVIDUAL CONVERSIONS TO BE PRINTED 


on 
oO 
ts 
is 
abe 
N 
t 
w 
m 
4 


Commo dw 
PALO 





_ ee 


NOL 
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' p2aDB8.P 
£07 : SINGLE INSTRUCTION TEST LOOP (SA 260) HALTS TWICE 
£58 :15T HALT- LOAD STARTING ADDRESS OF THE TEST YOU KISH 
6°93 ‘TO RUNG (THE RODRESS OF THE TESTXX TAS) 
519 t2ND HALT- SET TIONS CBIT 11 MUST =O) 
612 sWAS-IS TEST HALTS 3 TIMES AT THE START: 
13 :15T HALT - LOAD INITIAL CHANNEL (BITS 95-00) AND GAIN (BITS 07-06) 
614 ND HALT - LOAD NUMBER OF CHANNELS TO BE TESTED 
gis 35RD HALT - SET SR OPTIONS 
16 :SWS=1 CAUSES : COMPARISONS ON EACH CHANNEL BEFORE SWITCHING CHANNELS 
| 617 :SWo=1 CAUSES A COMPARISON OF INITIAL TABLE AND NEW TABLE TO BE PRINTED OUT 
| §1g :SW7=1 CAUSES WAS-IS COMPARISON OF INITIAL TABLE AND NEW TABLE, 
£15 NSTEAD OF OLD TABLE AND NEW TABLE 
£36 ;SH9=1 IHHiBITS + OR - 1 LSS TESTING (VALLES MUST AGREE EXACTLY) % 
£3) :SWid=1 INKIBITS AVERAGING WHEN CREATING THE INITIAL 
£32 :SW13=1 IN HIE 1 ERROR PRINTOUTS SO THAT DRIFT CAN Be Tete ep , 
£53 T EXTRANEOUS PRINT OUTS > 
be) BELL arias. EPTER EVERY 4096 PASSES > 
625 ; REPEATABILITY TEST (3 SIGMA) HALTS TWICE 
£27 51ST HALT - LOAD INITIAL CHANNEL (BITS 05-00) 
28 : } 32ND ty i - LOAD NUMBER OF CHANNELS TO <3 TESTED 
£39 SW&=1 CAUSES PRINTOUT OF EACH OISTRIBUT 
30 :SW7=1 CAUSES PRINTOUT OF ONLY THOSE DISTRIBUTIONS WHICH FAIL 
ee 177570 SR=177570 
33 177776 PSR=177776 
634 do0240 NOP=240 
635 104000 T=EMT 
£36 104400 SCOPE=TRAP 
£37 000000 RO=%0 SCRATCH AND DISPLAY 
£38 000001 ADCSR=%1 ADDRESS OF STATUS REGISTER 
a a 900002 Re=%e SCR TCH 
640 000003 R3=%3 :SCRA 
641 009004 INTVC=“4 SA ERRUPT VECTOR ADDRESS 
B42 999005 RS=45 : SCRATCH 
43 095996 SP=%6 STACK POINTER 
a 000087 PO=%7 ‘PROGRAM COUNTER 
Ne LOAD TRAP CATCHER INTO 0 THRU 377 
48 sLOAD TRAP VECTORS 
£49 000 .230 
650 009030 013222 PRINT 
651 900032 900340 340 
653 900034 013562 SCOPEC 
654 000026 000 
6b LOAD STARTING ADDRESS AREA 
657 o00200 2200 sNORMAL (WORST CASE) STARTING ADDRESS 
£52 012706 OOD600 MOV aSTACK, %6 
659 000167 000472 IMP BEGIN 
660 000010 012706 o00600 MOV BSTACK, “6 RESTART STARTING ADDRESS FOR 
i 600214 000167 O0051e IMP RESTRT WORST CASE TEST 


66 
tte 200220 Ole706 000600 MOV eSTACK, %6 DISPLAY CONVERSION LOOP 
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09617) 
Dg 5069 


sMP DSPLAY 
MOV aSTACK, “6 
MP XTEST 


J E 
MOV aSTACK, %b 
IMP EXFeST 
MOV $STACK, % 
IMP 
MOV WETACK, “6 
IMP TESTX 
MOV aSTACK,%& 
IMP W . 
MOV aSTACK,“& - 
IMP SIGMAL 
LORD DATA AREA 
. =600 
STACK: QO 
ADCS: 176770 
ADD 17&772 
CSRE: 0 
ADINT: 130 
OUNT: O 
TCSR: 177564 
TOBR: 177566 
INTFLG: QO 
INITCH: O 
CH: O 
TRNX: 0 
PROC: OQ 
SETUP: MOV ADCS Arc 
MOV ADCSR 
INC ADCSRE 
MOV eit al INTVC 
MOV iy i¢0 NT 
MOV 
MOV 
CLR thre 
RTS 


BEGIN: Hel T 
BIC a1 Pagar. INITCH 
HALT 
MOV SR, NUMCH 
HALT 

RESTRT: JSR 47, SETUP 
TSTe «© aT¢SR 
BPL 4 
RESET 
TST QADCSR 
BE® +4 
HL 


TESTO: SCOPE 


;EXTERNAL CONVERSION TEST LOOP 


RUNNING CONVERSION PRINTOLT 
; ROUTINE TO LOOP THRU A GIVEN INSTRUCTION 
'ROUTINE TO CoN RT ON EACH CHANNEL 


»AND COMPARE TO PREVIOUS CONVERSZONS 
sROUTINE TO TEST REPEATABILITY 


D R1 WITH ADCSR ADDRESS 

TIALIZE 000 BYTE CSR ADDRESS POINTER 
T 

T 


ALIZE INTERRUPT ADDRESS POINTER 

ALE gy AERATION COUNT 
RST RETURN SS_FOR SCOPE 

PRO TSE ah PRIORITY TO 7 

I INTERRUPT FLAG 


;CHECK TO ore THAT CER WAS CORREO TET EY INITIALIZED 
CH+1 


;SET FIRST CHANNEL TO BE TESTED 
iS TORE eet ences TQ ue TESTED 
BUT CHANNE 


T 
;REINITIALIZE PERIPHERALS 
;CHECK FOR COR cum INITIALIZATION OF CSR 
;BRANCH IF a a 
;CSR WAS NOT NETIALIZED TO ZERO 


nh 
;RE 


we me ee ere 2 eee 


.MSIN. CY11 

DOZAOBS. Pil 
713 
ze0 000756 
$33 Soacea 
723 eee 
; 000772 
72S 000774 
726 001000 
72? 001006 
728 0010le 
rs 001014 
230 001020 
731 001924 
73se 001026 
733 
z 001030 
737 
z 
740 001032 
74} OO1034 
742 901040 
743 eta 
744 O01 
745 OO1046 
746 001050 
747 901056 
748 001062 
743 OO1064 
750 OCIDEE 
753 001070 
752 
753 
754 
755 001972 
756 
757 001074 
758 901100 
753 001104 
760 9001106 
761 901119 
7&2 OOille 
762 001114 
764 OO11IE 
7é5 
766 001120 
7&7 
768 O0lle2 
763 OOll2e 
BB 
77e pot tas 
7732 «4001144 
774 OO114E 


2 
8 


F 
& 
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177622 
7srr 


177544 


177740 
177530 


~ 


177504 
900001 


177456 
177740 


177450. 


177534 


177454 
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:SHOW THAT READ/WRITE BITS OF THE CSR CAN SE SET TO 0 OR 1 AND READ SACK 
TST ADDER ;CLEAR D 


ST ONE 
CLR aadcsr : 00 
BIT #177577, QADCSR :CHECK ALL BITS BUT DONE 
BEQ :SRANCH IF ALL BITS READ BACK AS ZERO 
HLT -NOT ALL BITS READ SACK AS ZERO 
TST SAODER CLEAR DONE 
BIS >SET PROCESSOR PRIORITY AT 7 TO PREVENT INTERRUPTS 
MOV bet? DADCSR :LOAD ONES INTO ALL WRITEASLE BITS 
MOV JADCSR, Re :DONE MAY OR MAY NOT BE SET 
BIC #200, ' Re :SO READ BACK CONTENTS OF THE REGISTER 
CMP Re #137536 :BUT IGNO 
SEO 44 “BRANCH IF CORRECT 
HLT "CSR DID NOT READ BACK CORRECTLY 


;TEST FOR DONE BEING SET WITHIN 40 NICROSECONDS (OR LONGER 
?DEPENDING ON CPU AND MEMORY) AFTER A/D STAR 
:TEST READING DBR RESETS DONE TO ZERO 
:TEST INDIRECTLY FOR DONE CLEARING A/D START (VIA SECOND A/D START) 
CLRB —«MADCSR s INITIALIZE CSR LOWER BYT 
TST DADDBR ‘READ DBR TO aTEAR DONE 
TSTB © aADCSR ‘CHECK DONE BIT 
+4 :CONTINUE IF CLEARE 
*READING DBR DIDN’T CLEAR DONE 
INCB 2ADCSR “START CONVERSION 
MO 8-32. , COUNT ‘LOAD COUNTER FOR TI 
IN cou t ‘LOOP FOR AT LEAST 40 MICROSECONDS 
TSTB 9ADCSR sCHECK DONE BIT 
BMI +4 *CONTINUE IF SET 4 
ONE WASN’T SET WITHIN 100 MICROSECONDS. 
EITHER A/D DONE PREVIOUSLY FAILED TO CLEAR A/D START, 
OR DONE ITSELF FAILED HERE 
TEST2: SCOPE 
:SHOW THAT A CLEAR INSTRUCTION DOESN’T CLEAR DONE 
TST JADDBR scl LEAR DONE 
MOV #1, JADCSR :IN ITA ZE CONVERTER AND START CONVERSION 
STB OROCSR * WAIT DONE 
CLRB  <dADCSR ;CLEAR LOWER BYTE 
TSTB = BADCSR CHECK DONE 
BMI +4 :BRANCH IF SET 
HLT *DONE WAS CLEARED 
TEST3: SCOPE 
:DATOB 19 gh OHER BYTE OF CSR SHOULDN’T START CONVERSION 
CLEAR DONE 
cca JADCSR :DATOB TO LOWER BYTE 
8-32. , COUNT WAIT 
COUNT 


BNE = 
TSTB @ADCSR ;CHECK DONE BIT 
BPL +10 ;BRANCH IF NOT SET 





| “e 
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' ASAR ll 
775 001150 104000 HLT sDATOB TO LOWER BYTE CAUSED CONVERSION 
rf O61 15e 77? 177426 TST JADDBR ‘CLEAR DON 
ML 1156 105011 ' CLRB  @ADCSR REPEAT TEST, KNOWING SIT1=C 
778 901160 12767 177740 177424 - MOV 8-32. , COUNT “WAIT AGAIN 
779 1186 > \?ruao n> ne COUNT 
780 (0011 1375 BNE - 

781 001174 105711 TSTB  dADCSR sCHECK DONE BIT 
782 001176 100001 PL 44 :CONTINUE IF CLEARED 
83 001205 104000 HLT :5SATOB TO LOWER BYTE CAUSED CONVERSION 
785 001202 104400 TEST4: SCOPE 
788 a sNEW MUX AND GAIN VIA DATO WITH B11150 SHOULD START CONVERSION 
7? 001204 005777 177374 TST QADDBR AR DONE 
788 OO0le10 19501) CLRB SEDCSR BR BIT IN CASE PREVIOUSLY SET 
783 OOlele SOSo1 ; ELR dAOSSR cbERe CONVERSIO 
790 001214 012767 177740 177270 MOV 8-32. , COUNT : STAR AWHILE 
73) Ooigee Q0S267 177364 INC COUNT 
792 901226 901375 BNE =4 
793 (001230 105711 TSTB  9ADCSR :CHECK DONE BIT 
734 001232 100401 BMI +4 CONTINUE TF SET 
ce 001234 104000 HLT :DONE WASN’T SET WITHIN ASOUT 100 MICROSECONDS 
737 001236 104400 TESTS: SCOPE 
798 :NEW MUX VIA DATOB (SIT1=0) SHOULD START CONVERSION 
789 001240 005777 177340 TST SADDBR sCLEAR DONE 
B00 001244 105011 CLRB  aADCSR CLEAR BIT1 
801 O0012%6 105077 177334 €LRB ss MAD ‘START CONVERSION VIA DATOB TO UPPER BYTE 
g02 Oo le5e 12767 177740 177332 MOV 8-22, , COUNT :SET UP TIMING LOOP 
803 901 pez be 177326 INC COUNT t WAIT 
804 001264 001375 BNE <4 
805 ebb 105711 TSTB  dADCSR ; CHECK BIT 
806 O0! 100401 BMI +4 > CONT INUE T 
807 001272 104000 HLT ‘DONE WASN’T SET WITHIN ABOUT 100 MICROSECONDS 
805 001274 104400 
810 MUX ie "Ht a Y SET SHOULDN’T START CONVERSION 
811 , NOTE HAT THE FECT 9 BITI DEPENDS ON ITS STATE BEFORE THE DATO 
Bl2 001276 152711 000002 BISB SET EXTERNAL ENABLE 
813 091 302 hees>> 177776 TST seabeR 5 CLEAR DONE 
814 901306 005011 CLR BADCSR *DATO TO CSR 
BiS 001310 012767 177740 177274 MOV #-32. , COUNT WAIT AWHILE 
816 001316 7? 177270 INC COUNT 
Ela poLaed Spee Feta 4 -MADCSR CHECK DONE BIT 
se poise 1 raat BP. +4 CORT INGE TF CLEARED 
Bet 001330 1 HLT :CONVERSION OCCURRED 
822 001332 104400 TEST?: 
823 SET TING sEere mae £ 10, ONE VIA FULL WORD DATO SHOULD CAUSE CONVERSION 
B24 -TF B i hes PREVIOUSL 
825 01334 005777 177244 
Eee 00 1349 i il cre EEO Hi BYT ob STATUS REGISTER 
001 12711 oo0002 MOV og Rese iE xe 
B28 OO1346 012767 177740 177236 MOV 8-32. , COUNT :WA 
829 001354 005267 177232 INC COUNT 
820 001360 001375 BNE <4 


E02 
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| OZADBB.P 

831 O01362 142711 00002 BiCB #2, aADCSR ;CLEAR EXTERNAL ENABLE 
B3¢ 301 366 198741 TSTB = ADCSR » CHECK DONE 

50} 100401 BMI +4 BRANCH F SET 
es 001372 104000 HLT CONVERSION DID NOT OCCUR 
538 001374 104400 TESTS: SCOPE 

: :SETTING A/D START WITH BIT 1 PREVIOUSLY SET SHOULD START CONVERSION 

838 001376 005777 177202 Tet sCLEAR DONE 
839 0014 412711 oo0dce2 MOVB #2. JADCSR :SET EXTERNAL ENABLE (BIT 1) 
840 014 li = INC —- @ADCSR i5ET A /D STA 
841 001410 012767 177740 177174 MOV #-32. , COUNT * WAIT 
845 901416 005267 177170 INC COUNT 
B43 001422 001375 SNE - = 
844 001424 105711 TSTB 3ADCSR sCHECK DONE 
845 001426 100401 BMI 44 BRANCH IF SET 
eve 001430 104000 HLT :CONVERSION DID NOT OCCUR 
848 001432 104400 SCOPE 
ev Teg FOR NO NO EXTERNAL CONVERSION (DURING BASIC INSTRUCTION TEST NO EXTERNAL 
851 001434 105011 CLRB.  ADCSR s INITIALIZE CSR LOW BYTE 
gS 001438 005777 177342 TST DADDBR :CLERR DONE 

001442 162711 o0000e BISB 82, JADCSR NABLE EXTERNAL CONVERSIONS 
®54 001446 OOSOE7 177140 CLR COUNT : INITIALIZE COUNTER 
85S O014S2 105267 177134 INCB . COUNT ‘WAIT AWHILE 
856 001456 001375 BNE a 
857 001460 105711 TSTB & IADCSR :CHECK DONE 
858 901462 100004 BPL «~S«&RTESTIO :CONTINUE IF NO CONVERSION OCCURRED 
859 901464 Ole7d2 014071 MOV sMSG1, x2 ‘SETUP MESSAGE ADDRESS 
E60 001470 OC4767 012320 JSR 7, TOUT PRINTOUT ERROR MESSAGE 
B62 O01474 104400 TEST10: SCOPE g 
£63 :TWO SUCCESSIVE DATO’S SHOULD SET THE ERROR FLAG 
B64 001476 105011 cL RB steer sIN ur 2E CSR LOW BYTE 
86S 001 005777 177100 TST 2CL 
B66 001504 005011 arr FIRST DATO, CLEARS ERROR FLAG 
87 901506 5911 LR SeOCSr ; SECOND bar TO, D SET ERROR FLAG 
868 001510 11 CSR “CHECK ERROR 7 i aoe 
B63 o0151¢ 100401 BN] +4 :CONTINUE IF ERROR Was SET 
70 001514 1 ERROR FLAG WASN'T SET 
872 001516 104400 TEST11: SCOPE 
873 :NEW MUX FOLLOWED IMMEDIATELY BY SETTING A/D START TO 1 
874 "SHOULD SET ERROR FLAG 
875 001520 105711 TSTB. adADCSR CLEAR DONE 
87 001522 10501} CLRB SeOCSR :IN TIALZE LOW BYTE OF CSR 
877 001524 ll CLR CSR :DATO TO CSR 
878 001526 1} I JADCSR SET A/D START 
879 001530 11 TST aADCSR : CHECK 
B80 O0153¢ 100401 I +4 ;BRANCH IF SET 
8681 001534 104000 HLT ERROR WAS NOT SET 
e82 001536 105711 TSTB  @ADCSR :WAIT FOR DONE 
ees 001540 100376 BPL 2 
68S oOIs¥2 104400 TEST12: SCOPE 
GEE :BEGINNING CONVERSION AFTER SEEING DONE SET SHOULD CAUSE AN ERROR IF 
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177034 
000001 


177006 
00009: 


176754 
C0000! 


176740 


sat 


176670 


FOe2 


; THE ie aaa ag T READ FROM THE DSR 


@ADCSR 


3CL NE 
INITIALIZE CSR AND START CONVERSION 
;WAIT FOR DONE 


iBhecK ERR lateness 
SCONTINGE F ERROR FLAG SET 
ERROR FLAG WASN'T SET 


CLEARING CSR WITHOUT READING PREVIOUS DATA SHOULD SET ERROR 
—— LEAR DONE 


TST aA 
MOV #1 
TSTB = ADCS 
BPL “2 
INCB  @ADCSR 
TST JADCSR 
eM! +4 
Hi 

TEST13: SCOPE 
nov 
TSTB SAOCSR 
BPL 2 
CLR JADCSR 
TST JADCSR 
BMI +4 
HLT 
TST8 9ADCSR 
BPL 72 
TEST14: 
ERROR SHOUL 

MOV #1 
TSTB SAOCSR 
BPL me 
TST JADOBR 


@ADCSR 
TST @ADCSR 
BPL +4 


HLT 
TSTB @ADCSR 
BPL “e 


TESTIS: 


@ADCSR 


@ADCSR 


; CLEAR 
INITIALIZE CSR AND CONVERT 
WAIT FOR DONE 


ao it WITHOUT ieee DATA 
sree ERR 

;CONTINUE IF FRROR FLAG SET 
s ERROR FLAG NOT SET 

WAIT FOR DONE 


SCOPE 
y1F DATA IN BUFFER IS READ BEFORE NEXT CONVERSION 
;NO ULD_OCCUR 


;CLEAR DONE 
Hy ah Re AND START CONVERSION 


; OR 00 
;TO ALLOW LOOPING ON TEST 


SCOPE 
OE ERROR A/D START TO ONE TWICE CONSECUTIVELY oe CAUSE 


JADDBR CLEAR (Powe 
MOV #1 JADCSR A ART AND INITIALIZE CSR 
INC JADCSR ;SET A/D START AGAIN 
TST BADCSR ‘CHECK ERROR BI 
BN +4 ‘CONTINUE IF ERROR SET 
HL “ERROR FLAG WAS NOT SET 
TSTB © @ADCSR tWAIT FOR DONE 
BPL -e TO ALLOW LOOPING ON TEST 
TEST 16: SC OPE 
TTING A/D ee IMMEDIATELY BY A DATOB TO HIGH BYTE, 
{SHOULD SET ERR 
CLEAR DONE 
cong ADCO SINIT ALIZE LOW BYTE OF CSR 
JADCSR *START CONVERSION 





GOe 
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943 Of1720 005011 CLR dADCSR :DATOB TO HIGH BYTE OF CSR 

944 O0L72e 005711 TST DADCSR ‘WHICH ALSO CLEARS PREVIOUS ERROR FLAG 

§45 001724 100401 BMI +4 ‘CHECK ERROR FLAG AND BRANCH IF SET 

946 01726 104000 HLT “ERROR FLAG WAS NOT SET 

Qu? 0217 l zi TSTB QADCSR ‘WAIT FOR DONE TO 

a8 1732 100376 BPL “2 ‘ALLOW LOOPING ON TEST 

950 001734 104400 TEST17: SCOPE 

951 -DATO WITH BIT 1=1 SHOULDN’T CAUSE ERROR EVEN THOUGH 

952 :PREVIOUS DATA WAS NOT READ 

953 01736 005777 176642 TsT JADDBR CLEAR DONE 

954 (01742 405011 CLRB aROCSE ‘INITIALIZE CSR LOW BYTE 

965 (01744 012711 ocoo0e MOV JAOCSR CLEAR ERROR ,SE OF FERAL ENABLE, 

856 01 1 it TSTB aaese :BN0 INITIATE CONVERSION 

35 (01 1903 BP ‘WAIT F 
N01 ll CLR sABcSR : SECOND DA 0, WITHOUT READING DATA 

959 901756 005711 TST JADCSR CHECK ERR 

960 301760 100001 BPL +4 :BRANCH IF NOT cet 

21 301762 104000 HLT *ERROR WAS SET 

963 301764 104400 TEST18: SCOPE 

S64 :DONE SHOULD CAUSE AN INTERRUPT IF INTERRUPT ENABLE IS SET 

965 001766 005777 176612 TST ADDBR >CLEAR DONE 

966 001772 105011 CLRB  aaDCSR * INITIALIZE LOW BYTE OF CSR 

967 001774 OS2767 000340 175774 BIS #340, PSR ‘SET PROCESSOR PRIORITY TO LEVEL 7 

98 O02002 012714 0o02050 MOV sTINTD, aINTVC *SETUP RETURN FROM INTERRUPT 

8639 002006 016764 175764 oD0002 MOV PSR BCINTVC)’ 

$70 002014 042767 O00340 175754 BIC #340,PSR ;SET PROCESSOR PRIORITY TO 0 

$71 O02022 O1e711 000001 MOV #] SROCSR :CLEAR ERROR AND START CONVERSION 

872 002026 112711 000100 ; MOVE #100, aA :SET INTERRUPT ENABLE 

873 002032 105711 TSTB SaoceR *CHECK DONE 

874 002034 100376 BPL 2 

875 002036 104000 HL sDONE DIDN’T CAUSE AN INTERRUPT 

876 O02040 016467 o00002 175730 MOV 2tINTVC), PSR RESTORE PROCESSOR STATUS 

977 002046 000401 SSKIP_ NEXT INSTRUCTION 

$78 O020S0 O2eb26 TINTD: CMP tthe (6)4 ST 

879 002052 105011 CLRB aaAdcsr CLEAR INTERRUPT ENABLE 

9690 002054 012714 000132 MOV #132, JINTVC *CHANGE INTERRUPT POINTER TO 

381 002060 000132 CLR aise *CAUSE HALT 

983 002064 104400 TEST Ia: SCOPE 

$84 OR SHOULD CAUSE AN INTERRUPT Ei INTERRUPT E IS SET 

98S 002066 012714 0o02142 NTE, @INTVC NTERRUPT RETURN 

986 002072 052767 000340 175676 Bis #340, 

987 902100 016764 175672 Oo00002 PSR 2c INTVC) 

SABIE i omy un ||| A petan SS REGRTENG' SI, HRA 
ie H 

980 OOell6 Ones e 1764 ist iStT 

991 002122 012711 100100 #100100, JADCSR ; START ONVERSION, ENABLE INTERRUPTS, SET ERROR 

Say 126 poge40 NOP *CLOCK IN INTERRUPT 

993 1 7? 000340 175640 BIS #340, PSR *RAISE PROCESSOR PRIORITY 

634 136 104000 HL NO INTERRUPT OCCURRED 

33 Maat TINTE ere tere (6)+ 

a39 asst 105011 CLRB spoceR ‘CLEAR IN FERRUPT T ENABLE 

998 002146 012714 000132 MOV #132, aINTVC "CHANGE INTERRUPT RETURN 


me ee ee ee 


a ee eee 


HO2 


Bs 
Be 
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PRINT OUT A a ne ELLING WHERE THE INTERRUPT OCCURRED 
;UNLESS IT WAS VEL S (THE STANDARD LEVEL) 
;MAKE SURE THAT IT ALWAYS OCCURS AT THE SAME LEVEL 


999 o021S2 005037 000132 CLR 38132 :TO CAUSE A HALT 
1900 002156 105711 TSTB  aJADCSR WAIT FOR DONE 

1031 002160 100376 BPL 2 

1003 o02162 104400 TEST20: SCOPE 

1004 :NO INTERRUPT SHOULD OCCUR IF PROCESSOR IS AT LEVEL 7 (BIT 2=0) 
1005 O02164 952767 o00340 175604 BIS #340, PSR SET PROCESSOR PRIORITY TO LEVEL 7 
1006 ogei7e biezi4 og22e0 MOV aliNtza, sPHNTVe SETUP RETURN 

i 176 016764 175574 oo0002 MOV 

1008 O02204 :05011 CLRB Fares sMAKE SURE THAT CONVERSION WILL OCCUR 
1098 O02206 012711 100100 MOV #100100, JADCSR ENABLE INTERRUPTS, SET ERROR, AND START CONVERSION 
1010 OOe2le o09240 NOP 5 CLOCK OCK INTER 

1011 002214 105011 CLRB  9ADCSR INT ERRUPT S 

1012 O0ee16 o00402 BR +6 OORT NUE IF NO INTERRUPT 

1013 O02e220 104000 TINT7A: HLT INTERRUPT OCCURRED WITH PROCESSOR AT LEVEL 7 
1014 OOeec2 Oeebeb CMP (6) +. (6)+ "RESTORE STACK POINTER 

1015 OO0c22e4 105711 TSTB  aADCSR WAIT FOR DONE 

1016 O02226 100376 BPL -2 

1017 OC2230 012714 090132 MOV tiie aINTVC : CHANGE INTERRUPT RETURN 

1018 Ge234 005037 900132 cL *TO CAUSE A HALT 

1019 MACR TNT STATUS, N; TESTNO 

deg jAN INTERRUPT SHOULD BE SEEN IF PROCESSOR IS AT LEVEL 'N’ (BIT 2=0) 
1022 8 PSR ;SET PROCESSOR PRIORITY TO LEVEL 7 
1023 MOV aunt N’A, JINTVC’ »SETUP RETURN 

1024 MOV INTVC) 

1025 MOV A sINIT IALIZE CSR 

1026 TSTB ‘he “WAIT FOR DONE 

i027 BPL -2 

1028 MOV #100, @ADCSR ;ENABLE INTERRUPTS 

10293 MOV #STATUS, PSR *SET PROCESSOR PRIORITY TO LEVEL *N’ 
i030 MOV ScINTVCS, PSR § ;SET PROCESSOR BACK TO LEVEL 

1031 HLT te ?NO INTERRUPT OCCURRED 

1933 TINT'N’A: CMP (SP)+,(SP)+ ;RESTORE STACK POINTER 

1034 CLRB = dADCSR CLEAR IN RRUPT ENABLE 

1035 MOV #132, JINTVC ICHANGE I NTERRUPT RETURN ADDRESS 
1036 CLR alse TO CAUSE A HALT 

1037 . ENOM 

1038 002240 INT 300,6, TEST21 

104 002332 INT 240,5, TEST22 

1043 002424 INT 200,4, TEST23 

1045 002516 INT 140, 3, TEST24 

1047 002610 INT 100,2, TESTS 

1099 002702 INT O40, 1, TEST26 

1081 FIND THE LEVEL AT WHICH BIT 2=1 CAUSES AN INTERRUPT 
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;FIRST SEE yA INTERRUPT OCCURS WITH PROCESSOR 


AT LeVeh 7 P 
tEST27: SCOPE INTERRUPT SHOULD OCCUR WITH PROCESSOR AT LEVEL 7 
090340 174772 BIS #340, PSR i T PROCESSOR TO LEVEL 
175574 TST JADDBR s CLEAR DONE 
CLRB  aADCSR ‘INITIALIZE LOW BYTE OF STATUS REGISTER 
LR JADCSR ‘INIT BLIZE STATUS REGISTER 
iste SADCSR :WAIT FOR DONE 
og30ue MOV i NI7e QINTVC ;SETUP RETURN 
174746 oo0002 MOV (INTVC) ;SETUP RETURN PROCESSOR STATUS 
MOVB Bod. SADCSR SET INTERRUPT ENABLE AND BIT 2 
NOP :CLOCK INTERRUP 
BR +6 *BRANCH IF NO INTERRUPT 
TINT7B: HLT i INTERR T OCCURRED WITH PROCESSOR AT LEVEL 7 
MP (SP)+. (SP)+ RES SP 
€LRB = aADCSR -DISABLE INTERRUPTS 
900132 MOV #132, JINTVC SHRINE INTERRUPT RETURN 
900132 CLR dele 0 CAUSE A 
jNGKE SURE At INTERRUPT CAN son WITH PROCESSOR PRIORITY AT LEVEL O 
090340 174706 BIS #340, PSR SET afROCESSOR TO LEVEL 7 
175510 TST SAODBR 
LR aeoKeR REE or ise 
TSTB  aADCSR 
003146 MOV aTENTX JINTVC ~ UP RETURN 
174662 o00002 MOV PSR. 2c tNTVC) 1S ba TURN PROCESSOR STATUS 
p00340 174652 BIC #340, PSR SSOR TO LEVEL 0 
000104 HOVE #104) SADCSR ef INTERRUP TERRUPT eiaece AND BIT 2 
L88 aADCSR BISeGLE INTER ee 
000340 174634 1s #340, PSR i Bee PRIORITY TO 7 
HLT 36, eee 


TINTX: eRe x calls NABLE RFTER INTERRUPT 
CMP Cepia ( eet STACK Bu 


001 MOV #1 
Bb 38 CLR yee C i 
.MACR INT2 TSTNO,PRP,STTS, INTLVL,NXT * 
Raa FOR R ANN INTERRUPT ON LEVEL ’INTLVL’ WITH’ BIT 
BIS #340, PSR ;SET PROCESSOR PRIORITY 10 7 
TST Se008R . 3CLE 
gL Re of nite ST This REGISTER 
a ee 
MOV stint’ PRP’B, JINTVC 


HOV Canepa ‘get Tue BE TURN, Paces FPReY PRIORITY 


nove #104, SADCSR iSeT T INTERRUPT | ENABLE AND 





‘ (emeaae ee ee 


JOe 








BR rie, iat TO NEXT Test 
10000S SETS: CMP INTFL #100005 ;CHECK PREVIOUS LEVEL 
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1111 CLRB = SADCSR ‘DISABLE INTERRUPTS 
llle MOV 2CINTVC) PSR jRESTORE PROCESSOR STATUS 
1113 MOV #132, dINTVC 5 CHA NGE IN TERR “4 RETURN 
1114 CLR 38130 19 cau se aH 
111s BR NXTS iG 0 NEXT HES | 
1117 TINT’ PRP’ 1B: CLRB _—sMADCSR DISABLE FURTHER INTERRUPTS 
1118 fn Oy tlie DINTVC SHANE iNTERRUPT RETU 
1139 CHP (SP)+,(SP)+ RESTORE STACK POINTER 
lel TST NEL :CHECK FOR PREV TOUS FL LAG 
i122 BMI ET’ INTLY ;BRANCH IF FLAG SET 
llo3 MOV 310000" INTLVL, meetup jSeT FLA G AND LEVEL 
1124 MOV #SGe, %2 NT ReSenge Tour 
1125 JSR %7, TOUT PRINT sage af T2 SET CAUSES AN 
1le6 MOV sIATLVL, x2 NTERRUPT AT LEVEL’ 
1127 JSR %? , PRSHRT aun L VEL NUMBER 
1138 JSR %7' CRLF : CARRI TURN, LINEFEED 
i129 BR GO_TO NEXT TEST’ 
1130 SET’ INTLVL: CMP INTFLG, sigco INTLVL __ CHECK PREVIOUS LEVEL 
113} BPL NXTST 360 To Next TEST’ IF INTERRUPT PREVIOUSLY AT AN EQUAL 
1133 HLT : INTERRUPT OCCURRED PREVIOUSLY ONLY AT A LOWER LEVEL 
1138 .ENOM 
1136 003162 INT2 TEST29,6,300,7, TEST30 
+138 003346 INT2 TEST30,5,240,6, TEST31 
1140 -TEST FOR AN INTERRUPT ON LEVEL 5 WITH BIT2 SET 
1141 003532 104400 TEST31: SCOPE 
1142 003534 052767 000340 174234 BIS #340,PSR ;SET PROCESSOR PRIORITY TO 7 
1143 003542 005777 175036 TST JADOBR * CLEAR 
1144 003546 105011 cLRB  aADCSR ; EXTERNAL ENABLE 
1145 003550 005011 CLR JADCSR $INETIOLICE St STATUS REGISTER 
1148 003552 105711 TSTB  aADCSR : 
tia poseee Atorie oar afin INTVC ;SETUP 
1149 ppser8 ft 764 eatati ooo002 MOV SURAT) +E TUp Hes TURN PROCESSOR STATUS 
1150 993570 12767 174200 MOV #200, PSR In iPr ena PRIORITY 
118 7% 1le71 i104 MOVB #104, @ADCSR TANT 
ties posepe CORB if 
His Oosete See? onooge srsise OB CEs 
1156 503620 phends BpoT SS CLR alse +O cat 
1122 BOSSE | Nps ra TINTYB aie ohBc 360 19 hex Te THER INTERRUPTS 
1138 eae vege) 000132 : sat Hie VINTVC ae NTEREUP ARR 
tee BOSE bezese te cur (ep)s (SP)+ Re Face” POINT R 
11 pase pas BrESES 174752 TST INTFLE ; ean “PREVIOUS 
ll 46 100404 BMI in 
i 003650 012767 100005 174742 MOV #10 {oGoos, INTFLG tag l 
il 
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003656 
003660 
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003666 100001 BPL TEST32 iON Me og A 18 M4 1 ate PREVIOUSLY OCCURRED AT 
003670 104000 HLT STNTERRUPT OCCURRED PREVIOUSLY ONLY AT A LOWER LEVEL 


003¢72 INT2 — TEST32,3, 140,4, TEST36 
sNO_INTERRUPT SHOULD OCCUR IF INTERRUPT ENABLE IS SET AND ERROR AND DONE ARE 
oo40S6 104400 +EST36: SCOPE 
oo4060 O0S777 174520 TST JADDBR ;CLEAR DONE TO PREVENT ERROR 
4 495011 CLR JADCSR fine Ede ain ENA BLE 
ll LR JADCSR NITIALIZ STATUS REGISTER 
004070 105711 TSTB = 3ADCSR 
eG ete 74504 ert sab R 
Boat a0 BY 14 004144 nev aNInT QINTVC er pone RN IN CASE 
Sas tiers, eee A Be 
Boi 35 Bi8se3 i7aese reais BIC Sut pet :SET PROCESSOR To LOWEST PRIORITY 
O4126 112711 000100 MOVE hte JADCSR zENGBLE INT 
132 900240 NOP I 0 ur ERRUPTS 
O41 34 052767 OCO00340 173634 BIS #340, PSR s SET PROCESSOR To, HIGHEST PRIORITY ever 
Spa tad rate NINT: HLT ‘PNT ERROPT ScCURRED 
004146 CMP (SP)+, (SP)¢ :RESTORE STACK POINTER 
004150 012714 000132 MOV #132, dINTVC *CHANGE INTERRUPT RETURN 
004154 000132 CLR d#lse ‘TOC 
004160 105011 CLRB = JADCSR ‘DISABLE INTERRUPTS 
-CHECK FOR REPEATABILITY OF READING DBR AT EACH GAIN 
004162 104400 TEST37: SCOPE 
004164 005777 174414 TST JADDBR sCLEAR D 
004170 105011 CLRB - dADCSR > CLEAR PONE BYTE 
004172 016767 174424 001726 MOV INITCH,SELECT  ;LOAD INITIAL CHANNEL 
004200 004767 Ooc040 JSR 47, REPTST : CHECK REPEATABILITY 
004204 052767 O00010 001714 BIS #10 SELECT *SET GAIN TO Xe 
004212 004767 O000026 JSR %7 REPTST s CHECK REPEATABILITY 
004216 052767 000020 001702 BIS sc6 SELECT ‘SET GAIN TO X8 
004224 004767 000014 JSR %7 REPTST ; CHECK ATABILITY 
004230 042767 000010 001670 BIC #10, SELECT :SET GAIN TO X4 
Oo4e% 004767 o0000e2 JSR “2? REPTST Tone REPEATABILITY 
Se sua 4 000100 174340 REPTST: MOV reat COUNT T UP SUNT 
6 V SELECT, JADCSR i CONVERT AT DESIRED GAIN 
Dove5b 105711 S78 WAIT FOR DONE 
004, bt 174316 MOV an eet = ;LOAD DATA INTO REGISTER 0 
004266 027700 174312 RELOOP: CMP JADDBR, RO READ DATA COMPARE 
bove7e 001401 BEG +4 t CONTINUE IF 08° THE SAME 
104000 HL :2 REROINGS DBR WEREN'T THE SAME 
004276 7? 174310 C COUNT ; COUNT 
1371 NE RELOOP LOOP 
004304 000207 RTS “7 * RETURN 
. *CHECK THE SIGN OPTION IF SWS IS SET (FOR POSITIVE VOLTAGE) 
004306 104400 TEST38: SCOPE 


r ne tee ee 


LOe2 
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| OZAD 
1223 004310 032767 O00400 173252 BiT #400, SR :CHECK SWB 
i224 004316 001475 BEQ TEST4O ; SKIP TEST IF NOT SET 
| lees 054320 ble70e 014304 HOV SG, Re i teu A POSITIVE VOLTAGE TO THE 
158 atte tae Taaee MOV ansGo Re EA hrf" BAN TNUE? ON THE CONSOLE” 
| 1228 004334 004767 007454 JSR aiigae 
| 1829 004349 900000 MALT ;WAIT FOR CORRECT VOLTAGE 
| 12830 004342 005067 007274 CLR ICOUN "RUN TEST ONLY ONC 
' 1831 004346 012767 000100 174226 MOV #100 COUNT s INITIALIZE COUNTER 
lese 004354 005777 174224 TST JADDBR ?CLEAR DONE 
1233 004360 105011 CLRB dat :CLEAR LOW BYTE 
1234 004362 16711 174234 LOOP38: HOV. INTTCH, aADCSR i STGRT, CONVERSION os 
| 3537 Bbts58 ibosze pO 
| 4232 004372 032777 176000 174204 SIT #176000,ADDBR ;CHECK DATA AND CLEAR DONE 
1238 do¥#00 Oo 14d BEQ .+6 ‘on otis nok BITS 10-15 ALL ZERO 
j ue 
1533 nth uate ne TEST39 hee 1 fest be tERO FAILURE 
| 1841 004405 005367 174200 DEC COUNT iC OUNT SBN 
leve 004412 001363 BNE LOOP38 *LOOP 
Tey “CHECK THE SIGN OPTION FOR NEGATIVE VOLTAGE, IF SWB WAS SET 
1245 004414 104400 TEST39: SCOPE 
124 OO4416 Ole702 014433 MOV ‘ MSG10 Re s"INPUT A NEGATIVE VOLTAGE TO THE 
1247 004422 004767 007365 ISR Tout INITIAL CHANNEL” 
1248 OO4426 012702 014366 MOV anges, R2 "THEN HIT *CONTINUE’ ON THE CONSOLE” 
1249 004432 004767 007356 ISR %7, TOUT 
1250 004436 oo0000 HALT WAIT FOR NEGATIVE VOLTAGE 
1251 904440 012767 000100 174144 MOV #100, COUNT SETUP COUNTER 
le52 004446 005777 174132 TST JADDBR AR 
1253 904452 105011 CLRB  aADCSR INITIALIZE LOW BYTE 
1254 O04454 016711 174142 LOOP39: MOV INITCH, JADCSR ;START CONVERSION 
1255 OO4460 105711 TSTB  SADCSR WAIT FOR DONE 
1256 OO4462 100376 BPL 2 
1257 OO4464 017702 174114 MOV JADDBR, Re ;LOAD DAT 
1258 004470 005102 COM R2 :COMPLEMENT DATA 
1259 o04472 176000 BIT #176000, Re ‘CHECK BITS 19-15 
1260 OOW76 001402 BEQ +6 : CONTINUE iF BLL HE € SET 
1261 004500 104000 HLT *BITS 10-15 NOT ALL RES TO ONE IN DBR 
lebe O04502 000403 BR TESTYO 
1263 04 005367 174102 DEC COUNT sCOUNT DOWN 
Les 10 001361 BNE LOOP39 *LOOP 
lob ;CHECK THE GAIN BY TAKING 12 S ON INITIAL CHANNEL AT EACH GAIN SETTING 
1e67 :THE TOTAL FOR EACH CHANNEL so Lv D BY 128 AND COMPARED WITH THE 
} sAV ERAGE VALUE AT THE HIGHE Se 
1269 *VALUES ARE TESTED He HIGHEST Gh iy LSB ACCURACY 4 
1270 ‘NOTE THAT THIS TEST IS NOT SCOPE LOOPABLE IF ERRORS OCCUR 
27) govs1e i 309 TEST4O: SCOPE 
i 149 Ole 000100 007120 MOV 8100,  ICOUNT ;PARTIALLY RESTORE ICOUNT 
1273 04522 005067 001400 CLR SELECT :SETUP GAIN TO X1 
tee Goes Geer dose HEE ||P BESS IL Oe Pet ac secu 
le Boueu2 at Bed AVGHO’ :BR Ht TAKE AVE tf Ror ser 
1277 OO4544 174034 ST JADDBR :CLEAR DONE 
1278 O045S50 !05011 CLRB = JADCSR : INITIALIZE LOW BYTE 
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1279 O04SS2 016711 001350 MUV SELECT, GROCSR : START CONVERSION ON DESIRED CHANNEL 
1280 004556 105711 TSTB adADCSR :WAIT FOR DONE 
1281 oo¥sb) 10 z - BPL -2 
lose Oo4s 1776? 174016 001170 MOV QADDBR,GAINI § ;STORE VALUE 
1283 04870 O04787 ate JSR %7 , DBRCK ;CHECK FOR BITS 10-15 ALL EQUAL 
1084 604574 052711 600010 SIs #10 JADCSR :SET GAIN TO X2 AND START CONVERSION 
1285 004600 105711 TSTB AD tsr WAIT FOR DONE 
i296 OO4E02 100376 BPL 
tee Seaess pauses doideg CotSO Hoy Saber, carne RIECK FORCBITS 10-15 ALL FQU 
185 tata Besse t BpaaSs BIS #20 JAOCSR :SET GAIN TO R: AND eraat CONVERSION 
l o04622 105711 TSTs aaocsr :WAIT FOR DONE 
1291 O04624 100378 BPL -2 
les OO4626 O177e7 173752 002132 NOY Oat GAINS ; STORE te Etrs we - 
I Souci at apace BIC 816 ‘cee GAIN TO X4 AK er aat ast RSION 
l OO4E44 105711 TSTB 3ADeSR :WAIT FOR DONE 
l 4 100376 SPL sce 
so Ol 173730 001106 MOV DBR,GAINY  § ;STORE VALUE 
004656 004767 001414 ISR %7, DBRCK :CHECK FOR BITS 10-15 ALL EQUAL 
000450 BR cx40 
767 0011 AVGHO: JSR ;CONVERT 128 TIMES AT GAIN OF 1 
095 MOV acAINL 5 TORE :LOAD POINTER 
JSR CONAV sAVERRGE THE TOTAL AND STORE IN GAIN! 
BIS 016, SEL: cT C GAIN 10 
JSR Ria :CONVERT 1 times AT GAIN OF 2 


MOV aghine STORE  ;LOAD POINTER 
7, CONAV !AVERAGE THE TOTAL AND STORE IN GAIN2 





290 
Bs 
295 
ESE 
1297 
1298 
1299 
130% 
13s 
1303 
1304 
1305 
1307 "oR 
1 BIC tid sececT :CHANGE GAIN TO Xx 
1309 BIS T 
1310 ISR %? CONVAT ;CONVERT 128 TIMES AT GAIN OF 4 
1312 oor on tno $080 NS TOTAL AND STORE IN GAINS 
iis 81S #15 SELECT sRVERAGE THe T 
13i8 ISR XP CONVAT :CONVERT 128 TIMES AT GAIN OF 8 
1318 JSR %7 , CONAV Oa 61 Me TOTAL AND STORE IN GAINS 
131 MOV GAINS, R3 AT NTO REGISTER 3 
Hi 2 oe a BT ee EN Se PUL AT Ba or 4 
l ASR R3 VIDE 8 BY 2 AND TRUNCATE 
ized MOV RS HGAINS aT CaN OF 4 
J MOV tng, R3 AT GA 
i363 3 83,R3 Quest ALLOWABLE VALUE AT GAIN OF 4 
1 R 
1325 ADC 
1326 MOV R3 LGAING 
1350 Ab ac Ra Aihanu VALUE AT GAIN OF 2 
i ar fs (DIVIDE BY 4 AND TRUNCAT 
1331 MOV HGAING STORE Ve 
133¢ MOV GAINS, GAIN OF 8 
1322 1 SUB #6,R2 it UATE nivus ALLOWABLE VALUE AT GAIN OF 2 
1334 905072 006203 ASR R3 (DIVIDE BY 2) 


eee ee e+ 
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1335 o0s074 005503 ALC R3 : (ROUND UP) 
1336 005076 006203 asR R3 DIVIDE BY 2) 
1 Oe Bese? 200672 mOY ORS. LGATN2 Foe BE VAL 
1338 ppette 12383 ate MOV Rathe MS Paane vacuee AT GAIN OF @ 
1340 bpsi12 203 000013 ADD #13,R2 ‘CALCULATE MAXIMUM ALLOWABLE VALUE AT GAIN OF 1 
1341 008116 203 BSR Rs (DIVIDE BY 8 AND TRUNCATE) 
1343 O0Sle2e 006203 ASR R3 
1344 posted 010360 pooese MOV R3. HGAINI :STORE V 
1345 130 016703 O00632 MOV GAINS, R3 ‘LOAD VALUE AT GAIN OF 8 
1346 005134 703 000013 SUB H13,R R3 sCALCULATE MINIMUM ALLOWABLE VALUE AT GAIN OF ! 
1348 005142 Gose03 adc R3 $ (ROUND 
1349 OOS144 O062 ASR R3 : (DIVIDE BY 2) 
1350 005146 905503 ADC R3 (ROUND U 
1351 005150 oo6203 ASR R3 (DIVIDE BY 2) 
1352 005152 O05 ADC R3 (ROUND UP) 
1353 005154 010367 o00624 MOV R3, LGAINI STORE VALUE 
1369 005160 026767 000606 OO00S76 CMPYO: CHP HGAINY, GAINY ; CONF MAX VALUE TO ACTUAL VALUE AT GAIN OF 4 
1358 905170 aes SES 000570 000576 CHP GRIN4, LGAINY ; COMPARE oft, VALUE TO ACTUAL AT GAIN OF 4 
1358 ppesee Geet 000572 oo0ss4 CHP HGAINE, GAINZ ; COMPARE MAX VALUE TO ACTUAL AT GAIN OF 2 
1369 o05215 2676 goos4s o00sée2 CNP GAIN2, LGAIN2 i COMPARE oittN VALUE TO ACTUAL AT GAIN OF 2 
i3ee ppesse o 767 coossé 000532 cre HGAINA , GAINI ; COMPARE atthe VALUE TO ACTUAL AT GAIN OF 1 
1364 005230 ered oo00s24 oo0s46 CMP GAINI,LGAIN1 | ;COMPARE MIN VALUE TO ACTUAL AT GAIN OF 1 
1365 605236 100501 BMI GMSG GAIN! TOO LOW 
1367 ooSe40 104400 TEST 4h: SCOPE 
1368 sTHIT PULSE SHOULD INITIALIZE THE INTERNAL “READ” FLIP-FLOP OFF 
1369 IF THIS FAILS, THE VERY FIRST CONVERSION WILL SET ERROR 
1370 oO0Se42 012767 O00002 006372 MOV #2, ICOUNT sRUN TEST TWICE ONLY 
1371 pp5260 105772 173340 a aTésr T FOR TTY Y READY ¥ 19 AVOID 
He bees ba sn toe 
1376 coeeee 06711 ie JADCSR iaTeR K ERR 
1399 rai ore “ jaye INCORRECTLY INITIALIZED 
1 £570 1057 TSTB CSR ONE 
Lars Hhesre Basho a 
1381 005274 104400 TESTY2: SCOPE 
1388 a, ae a aac! T WITH BIT Ait INTERRUPTS DON’T OCCUR AT BOTH LEVELS AT ONCE 
{See poeso ibeoli isig ple INT LOW BYTE OF CSR 
a ee eae 
1388 ppesea eehy Tree poo002 MOV Bop arteries 
1389 005332 042767 172436 BIC #340, PSR ue PROCESSOR PRIORITY TO LEVEL 0 
1390 O 012711 o000C) MOV #1, DADCSR CLEAR ERROR AND START CONVERSION 
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47, BELL 
RESTRI+4 


(6)+ 
NT3, aI 


w 
ya) 


NTVC), PSR 
344 


NTVC 


Ret ENE ENABLE 


cK DON 
‘BRA NCH TO RESTORE ORDER 
: DONE BION’ T CAUSE AN INTERRUPT 
RESTORE PROCESSOR STATUS 


RET ORE aie POINTER 
P RET FOR ag niet 





: URN 
Bey fine tot TO LEVE 
RRUPT 


SALLOW INT 
RESTORE PROCESSOR PRIORITY 
;BRANCH AROUND HALT 


;RESTORE STACK POINTER 
:CLEAR_ INTERRUPT 


ENABLE 
: CHAN a INTERRUPT POINTER TO 
;CAUSE A HALT 


. ~ 


;RING BELL 

START INSTRUCTION TESTS OVER 

a, i 43 

;BRANCH IF SET TO INH at a PRINTOUT 
HEDIFFERENTIAL AL GAIN NOT LINEAR WITHIN 
Sy “4 LSB” 


;OUTPUT HEADING 
; “MEASURED” 
;OUTPUT VALUE AT GAIN OF 8 


;OUTPUT VALUE AT GAIN OF 4 
;OUTPUT VALUE AT GAIN OF 2 
;OUTPUT VALUE AT GAIN OF 1- 


;"MAX OK" 
;OUTPUT VALUE AT GAIN OF 8 


;OUTPUT MAX ALLOWABLE AT GAIN OF 4 


;OUTPUT MAX ALLOWABLE AT GAIN OF 2 


em ee me ee em nee eee ee me mem ee ee ee ee ee 
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144? 005645 016702 000130 MOV HGAINL Re sOUTPUT MAX ALLOWABLE AT GAIN OF 1 
143 gosbse ? 995514 ISR %7 ,PROCT 


- —_— oon ee ee ce 
‘ 
. 





1450 gosbbe MOV aMSG17. Re "MIN OK" 

1451 66 JSR %? Tout 

1 005672 MOV GANS, Re sOUTPUT VALUE AT GAIN OF 8 

} 005676 JSR %7,PROCT 

} 005702 JR ¥7' SPACE 

1 095708 MV LGAINY. Re sQUTPUT MIN ALLOWABLE AT GAIN OF 4 

1456 00571 JSR —s- 47, PROCT 

1457 005716 ISR %.7' SPACE 

1458 005722 MOV LGAIN2. R2 sOUTPUT MIN ALLOWABLE AT GAIN OF 2 

1455 0057 ISR %7,, PROCT 

1460 ppesss JéR %7' SPACE 

1461 005736 MOV LGAIN1. Re sOQUTPUT MIN ALLOWABLE AT GAIN OF 1 

i462 005742 JSR %7 PRO 

1463 005746 COS&72 GCNT: MOV artsTais2, RETURN iSETUP SCOPE Loop RETURN POINTER 

Hed 005754 IMP l¢2 SUMP TO NEXT TEST 

1466 005760 GAINI: 0 

1467 005762 GAINe: 0 

1468 005764 GAIN4: 0 

1463 005766 GAINS: 4 

1470 005770 STORE: 

1471 005772 HGAING: 0 

1472 005774 LGAINY: 0 

1473 005776 HGAINe: 0 

1474 906000 LGAINe: 0 

1475 9506002 HGAINI: 0 

1476 906004 LGAINI: 0 

147? 006906 LSBFLG: 0 

1478 :¢ ONVERT dee TINES ar. GA N N_ AND J SHANNEL STORED IN SELECT 

1480 *6TORE THE SUMS I 

1481 006010 172570 CONVRT: TST SROBBR LEAR DONE 

1482 006014 10501 CLR8 aADCSR SENITIALIZE LOW BYTE 

1483 006016 LR R3 *WILL HOLD POINTER FOR SUMMING CONVERSION RESULTS 
1484 006020 00506 CLR SUM1 iL EAR SUMMING LOCATIONS 

1485 Ope0e4 905067 000070 CLR 

1486 005067 000066 CLR 

1487 006034 7 4 CLR SUM4 

1488 O06040 O1 116 MOV #SUM1,R3 sLOAD POINTER FOR SUMMING FIRST 32 CONVERSIONS 
i469 006044 O01 172540 LOOP2: MOV 840, COUNT ;LOAD COUNT TO ADD 32 CONVERSIONS 

1490 016711 00050 LOOP!: MOV SELECT, JADCSR ; START CONVERSION 

i%3 t a a Nag sWALT FOR Ore 

1493 006062 067713 172516 ADD DADDBR, IRB ;ADD THIS CONVERSION TO PREVIOUS SUM 

133 7 D204 ISR %7, DBROK CHECK FOR OR BITS 10-15 ALL EQUAL 

149% 00136 BNE LOOP SOP UNTIL 32 (DECIMAL) CONVERSIONS HAVE BEEN ADDED — 
1497 1 006124 CMP R3, sSUM4 SCHEC Fine "DONE one 

1498 06 1 BNE +4 * CONT NOT 

1499 1 RTS 4? sRETUR NAHE 128 CONVERS ons HAVE BEEN D 
1500 006110 O€e oooo02 2,R3 MOVE E POIN ER FOR SUMMING NEXT 3e CONVERSIONS 
1501 006114 000753 BR LObP2 : BRA 0 D0 NENT? SET Ing CONVERSIONS 

1502 006136 000000 SUM1: 0 
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2 ne. ae ee ee ee ee eee a ee eee oe os eee. 


1503 
1504 
1S9S 


ae 


= 


Paltaltaltaltal tal ealia| 
= 6 6 —< b= 0-0 Bt B= fo 
ONWUIS GIfue- 


rN ER att ati tit 


o-e- eovererresvesvervesverververnesvesverpennernervernenncrnernanternernarververternertertcrtarbert 
< 
Oo 


el el 


gepeeere 
ROnErSR Geiniay SoRREne 


me eee ee ee 


006120 
lee 
006124 
006126 


e 


ENSFRELHSEEGRKLS 


Stolsttasttoattatatstota 
A 


O-- 6 6 — © < & <b 9 = §-— b> ~< 9-2 & = Op HH 


Bs 


oO 
~ 
fu 
~J 
aR 


BO 
ss 


~ 
- 


006116 
177626 


172370 


172336 


172322 


172300 


me ee + 


DO3 


;CONTAINS GRIN AND CHANNEL 70 SE TESTED 
;RVERAGE THE 4 SUMS OF 32 CONVERSIONS EACH CONTAINED IN SUM THRU SUM4 


“STORE THE RESULT IN T E LOCATION WHOSE ADORESS IS CONTAINED IN STORE 
AONAV: MOV #SUM1,R -SET UP POIN 
MOV (RS)+,R2 *LORD SUM AND MOVE POINTER 
CLR aSTORE 
B.LOOP: ASR R3 :DIVIDE BY 32 
ASR R3 
asR R3 
ASR R3 
ASR R3 
ADC R3 sROUND OFF 
80D R3, ISTORE ADD TO PREVIOUS SUM OF AVERAGES 
C RS’ eSuM4+e ‘CHECK FOR FINISHING UP 
BEQ “AVG sFINISH UP 
MOV (RS)4+,R3 :PICK UP NEXT SUM 
gR 8. LOOP :CONT 
B.AVG: ASR JSTORE s DIVIDE SUM OF THE FOUR AVERAGES 
ASR aSTORE BY FO 
ADC JSTORE ?ROUND OFF 
RTS “2? RE 
;SUBROUTINE TO ISSUE N SPACES 
*N IS ONE PLUS VALUE CONTAINED IN SPACEX 
# SPACEX IS CLEARED WITHIN THE SUBROUTINE, SO THAT A CALL ON 
-SPACE WITHOUT LOADING SPACEX ISSUES ONLY ONE SPACE 
SPACE: i378 oTCSR ;WAIT FOR TTY READY 
MOV . 9,3 7DBR ; TPUT A _SPACE 
C PACEX :DECREMENT COUNT 
SPACE *LOOP IF NOT DONE 
LR SPACEX "RESET COUNT TO ZERO 
TS “7 * RETURN 
SPACEX: 0 . 
“SUBROUTINE TO OUTPUT: CARRIAGE RETURN AND LINEFEED 
GRLF: STB  aTCSR sWAIT FOR TTY READ 


WAI 
BPL <4 
MOV #215 aTOBR sOQUTPUT CARRIAGE RETURN 
STB a CSR WAIT FOR TTY READY 
MOV #212, JTDBR ;OQUTPUT LINEFEED 

RTS “? * RETURN 


“MAKE CERTAIN THAT BITS 10-15 OF ADDBR ALL EouaL 
OBRCK: BIT #17008, BR ;TEST BITS 10-15 OF DBR 
+4 H F ANY ARE SET 


BNE : * BRANCH 

RT 47 RETURN IF ALL ZERO 

HOY DADOBR, Re in0 Ta 10 REGISTER 2 
IT #176000, R2 ‘CHECK BITS 10-15 

BEG +4 *BRANCH IF ALL ZERO 


ne 8 ee ee oe ~_ i ee ee ee re a ee. es ee. ee ee 


E03 
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1553 006324 104000 HLT ‘BITS 10-15 NOT ALL EQUAL 
1560 006326 000207 RTS “7 

1562 “BELL ON PASS COMPLETE 

563 906230 108777 172260 BELL: S16 aT CSR 

1565 Besse } 0207 172252 MO 9207 JTOBR 

1566 105737 TSTB =. 8177564 

f6 Soe aee poease f Bk sani77s6 

t é 

ee 12767 Araser oos26e MOV atheros RETURN 

570 006364 Ole767 GONO00 905250 MOV #4000, {COUNT 

571 006372 000207 RTS %7 


; SUBROUTINE TO CHECK FOR END OF LINE 
Re CONTAINS NUMBER OF CHARACTERS JUST ouTeyt 
ONTAINS NUMBER TO BE OUTP Leta ce he CALL 


i ew ne a es ee ee -- 


te CNT CONTAINS CURRENT TOTAL LENGTH 
069267 900024 PUL ; ¢ ERS OUTPUT TO CURRENT SUM 
006400 066703 o00020 Peake’ R3 "ADD TOTAL TO PREDICTED 
BOEHOS 020387 000110 chp 3 #110 s CK FOR TOO LONG 
419 lo MI +12 : H IF OK 
006412 767 177626 JSR 47, CRLF TOO LONG, CARRIAGE RETURN 
436 7? oo00d2 ch R L. ONT IM TIAL IZE SouNT 
4 7 ¥¢ %? 
424 L.CNT: 0 


LSPS SMEFER SAM oo-o 
:GAIN RAY YE SE SET t ih att TS 06-07 
T 


SERRE BR eda total 


--0-- > > = 0 & < &< 9 <b B-< 9< & -* b= 9-0 &- 2 ho 6 = & =< p< & ~~ 9 B-< 0 9 


IF SWl4=1, 64 C SI AT FULL SPEED AND STORED 
590 : RES TS ARE DISPLAYED AT A TIME FOR ReOUT 4OMS. EACH 
591. IF SWIS=1 EACH CONVERSION WITH THE 
1592 ; RESULT DISPLAYED. TRACE NG IS NOT USED IN THIS ROUTINE 
1593 "IF THE CPU IS AN 11/0S, THE ROUTINE WILL HALT. 


< 


Re 
iS 
a 


472200 OSPLAY: JSR %7 SETUP 
coon MOV antl ae 


BIKRL 


CU uw 


1 

1 4 

1587 Soe 

1 450 

1599 OO064S4 TST RO 

1600 BNE DSPLY 

iene eet ;USE SA 2SO WITH SWIO SET IF 11/05 
i 105011 OSPLY: CLRB SR ; INITIALIZE LOW BYTE 

1604 777 Aes TST dADOSR ; 

1 7 171070 Bit 84 SR CHECK N 

1 1044 F BRANCH IF SET 

i 006' teat 000032 JSR 47, SET 

1 16711 377414 MOV CT, @ADCSR 

1 ie 105711 TST8 SR ;WAIT FOR DONE 

i610 O06514 1 BPL = 

et 172062 MOV dADDBR, RO ; nes T IN RO 

161 RESET ; oy y 

161 RESET ; VAL 

1614 O06Se6 005767 171036 TS SR ; CHECK suls FOR HALTING ON SINGLE CONVERSIONS 


SMRIN. MACY1I 
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006S32 


ee 


OO&S46 


o—- > ~6 -p— 


Fe cu RURRo RRB UMTS eS 


1643 


= 


1658 


SeEGRREDReeS 
S888 S83 S888 


S 
o 
2R82 Rs 


8 
\ 


ee re ee ee me eee ee 


eri 732) 


171024 
140377 

? 000100 
67 000010 
? 000200 
000026 


006674 
177716 
177300 


ies 


006674 


iS 


007074 
177570 


171454 


177361 
177352 
171006 


177334 
170770 


177316 
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BPL +4 sBRANCH IF NOT SET 

mt osp LY : HALT AND DISPLAY VALUE 
SET: MOVB  5R,SELECT+ :SET UP CHANNEL 

BIC 3140377, SELECT 

BIT #1 0,SR’ 

same! 

g #10, SELECT 
DSCNT1: BIT #200. SR 

BEQ pscnt2 

BIS #20, SELECT 
DScNTe: RTS 
AST: MOV SF TABLE, R3 sLOAD POINTER 

JSR %7, SET 
F.LOOP: MOV SELECT, BADCSR sSTART CONVERSION 

1378 SAQCSR’ ‘WAIT FOR DONE 

MOV Dea ; STORE pare 

CMP nF TABLE 200 *CHECK FOR DONE 

BNE IF NOT DONE, BRANCH 
FSHOW: MOV tETROLE R3 ; LOAD POINTER 

MOV 3)+,R0 “LOAD RO 

RESET :DISPLAY DATA 

RESET 

RESET 

RESET 

CMP R3,#FTABLE+200 ;CHECK FOR END OF TABLE 

BNE FSHOW+4 2C 

JMP DSPLY ‘RETURN TO BASIC LCOP 
FTABLE: 0 pa 


FO3 





s EXTERNAL cha S TO CHECK CONVERSION SPEED CERTAIN ERROR 
i CASES INVOLVING EX IONS. ON EVERY TENTH CONVERSION EXTEST 
;PRIN 5 Oy 0”. 21, EXTERNAL ENABLE IS NOT SET SO NO PRINTOUTS 
; SHOULD iF =1, INTERNAL CONVERS ARE RUN CONTINOUSLY AND 
PRINTO oe an SH? VENTS DONE FROM ING CLEARED 
BND AN ERROR PRINTOUT ON THE SECOND EXTERNAL CONVERSION. 
: THE SUITCHES S ARE MUTUALLY EXCLUSIVE AND ARE SCANNED IN 
* TRAC NG IS NOT USED IN THIS ROUTINE 
bxtes ‘i eo eR 
“7? ;START ON A NEW LINE 
ee L.CNT s INITIALIZE COUNTER FOR LENGTH OF LINE 
Pata scl ERR COM BYTE OF STATUS REGISTER 
:TO RR XTERNAL ENABLE (TO CLEAR 
LR JADCSR ; TART ION BY LOADING HIGH BYTE 
TSTB  aADCSR I - 
2 car's R ION at GHT HAVE STARTED IT (SO ERROR 
TST 96008R WEAR jit 
fh BLASS 
S18 oAQCSR STARTS ANOTHER CONVERSION) 


teem rm a nr rr te ne a ree ere me 


G03 
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DZA0 
1671 007136 OOS777 171442 TsT JADDBR CLEAR DONE 
ig7e 007 12 108711 1318 aAOCER MAKE SURE THAT DONE CLEARED 
1E54 O07 146 ALT DONE WAS SET 
| 1675 07150 ocoo4o 170412 EXCK: BIT #40,SR CHECK SWS 
| 2678 007155 001034 BNE EXSWS ; BRANCH IF SET 
1877 007160 932767 O00100 170402 BIT #100, SR 
1678 O07166 001077 BNE EXINT BRANCH IF SET 
1679 007170 105767 170374 TSTB = SR CHECK Sil? 
1880 007174 100514 BMI EXSIT BRANCH IF SET 
1881 007176 Ole767 000012 171406 MOV #12, COUNT INITIALIZE COUNT 
1682 007204 152711 o0000e BISB #2, dADCSR :SET EXTERNAL ENABLE 
1683 007210 105711 EXLOOP: TSTB  dADCSR * CHECK 
1688 007612 ire? oe BPL EXCNT ; BRANCH IF NOT SET 
| Tee borseo ors BEG EXPRNT ERANCH TF TENTH CONVERSION 
| 1687 OO7e22 005777 171356 TST JADDBR :CL 
| 1688 007226 011167 000214 EXCNT1: MOV DADCSR,SAVCSR SAVE CONTENTS OF CSR 
' 1689 O07e32 005767 O00e210 TST SAVCSR :C 
1690 007236 100364 BPL EXLOOP LOO IF NOT SET 
1692 007242 mined 000156 INC ERFLG1 "SET FLAG TO INDICATE ERROR PRINTOUT OCCURRED 
1693 bores 900720 BR -. EXTSTI REST 
| He Mepy, 17 tsa Breet: Sete: SabtSR ay — 
1586 DOress 160004 : EP eNCNTS s CONTINUE F NOT SET 
1698 O07ebe2 7 000136 INC ERFLG1 T FLAG TO INDICATE ERROR PRINTOUT OCCURRED 
lees Drees Door lo evenre: Bae ESTERT arte PAIL 
ir 007272 ae ; EPL EXCNT3 CONTINUE IF Not SET 
122 INC RFLGI ET FLAG T ICATE ERROR PRINTOUT OCCURRED 
ie Beas free a en po 
1705 007304 10s267 171302 EXCNT3: INcB COUNT ;COUNT 
1508 ‘i 3} 2st R Byrct jae t MAIN TO CHECK SWITCHES 
1 poeais pee? 000104 EXPRNT: TST ERreGt aa: a RROR PRINTOU 
His Bares GELS are HERO Utd her, ive ree 
_ ii Bos Se ? pe748 LR L. ONT Ara Tece RETURN, LINE INE 
' 712 007332 005067 Onno CLR ERFLG1 nti a 
1743 res bares ohar78 EXCNT4: HOV #10, Re : PR NTOUT "10" 
1715 767 i7ob40 JSR %7, SPACE 
1736 0073S2 012702 MOV #3, Re roar NENT Chote IN N Re 
i718 Borse6 GON by 177010 : 35k i FULLK ts ee ah CINE 
1348 seat 990903 EXINT: MOV £3, Sa0CSR SRG TURN 10 ONVE Tow ang ser EXTERNAL ENABLE 
1721 O36? 1 BIT #100200, ADCSR s CHECK 
i723 1753 171200 fee an icteaR " a 
He Bae Br a  E 
1726 007410 bos2ii ENE JADCSR : START cone ION 


a ee 


em eee 


HO3 
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1727 007412 000767 BR EXINT+4 sCONTI NUE | 
17 007414 453008 HLT jERROR 5 eet 
i 507416 oocode2 INC ERFLG1 SET "FLAG TO INDICATE ERROR PRINTOUT OCCURRED 
i Sousa Suet RFLGi ' iis Me /ETERMI NEED FOR STARTING A NEW LINE 
at 8 
l use eee ooo00e2 Bear Bice #2, JADCSR ie EXTERNAL ENABL 
1 32 905711 TST JAOCSR ‘WAIT FOR ERROR 
} 4 1 BFL 2 
6 04 HL sERROR WAS SET 
S267 177760 INC RFLGI *SET FLAG TO INDICATE ERROR PRINTOUT OCCURRED 
pore O00be1 BR XTST1 RESTART 
7445 O00 SAVCSR: 0 
fer Batu CONVERSION R TINE 
a ont ough RTER, £ BLES EXTERNAL CON VERSIONS AND 
READING THE DBR, AND CHECKS 


Pani fat Rach Darel an Tae ET RATE EXTERNAL 
: pt. ._ TRACE VTRPPIN. Is NOT USED THOUGHT OF he pores hea hag 


cat 170022 FLY.3: 
s 176764 


FLY.2: 
1 171 
100375 


BRANCH IF NHIBIT AVERAGING 
IN 


Aig a ‘ Ss Forres 
SN ame Miers 
aTtSR WALT FOR 


8 
= 

LT i 
a 
ah 


BEBIIIIAIIAIIS SLE RTERS SUTTONS SS aa ToRAS SEIN TERS 


o— 0 +6 &- b= b— b= 0 = b - 0 = & + = Fb b= b= 6 © 0 0b 0 Bb 0 0 = +O 2 0 2 2 2 2 bo po = po 


007450 OO47&7 171156 icpeered JSR 
007454 171124 EXFLOP: TST sCLEAR DONE 
007460 105011 CLRB © SADCSR s INITIALIZE LOW BYTE 
007462 1] CLR JADCSR : CONVERSION 
Bris Hee Tae tee at hn 
Sousa iee1 | pOoRS ney 2g008R JADCSR HINTTIaC Ze exer, CONVERSION 
Send TREStt EXCONT: TSTB  @ADCSR : ba 
097502 100376 BPL = ee ; 
res tie ye Tor se 
Reset BR CEXFLOP iEBROR 
007514 171064 TST SADDER *CLEAR DONE 
Bo7es2  bopeRO i egenee: — 
EXCNT: 
s CONVERSION PRINT 
su oe foes ON WHICH YOU WISH TO CONVERT 
;SW10=0 - OER ERS ARE a AND Ty RESULT IS PRINTED OUT 
=} eh H INDIVIDUAL $2 
sores, eet rune i dinpeabemaiig 
005067 176664 L. ONT TIALIZE COUNTER FOR LENGTH OF LINE 
ee basoad $2000, SR sINITIAL TE 


= 


27(732) 
000240 171000 


000007 
176544 


7610 Qle777 


12702 


z 

ws 

ge B: 
~ 
~ 


BIeR 


170746 


383 


176674 
176256 


$88 


170724 


170744 


167674 170730 
000002 


170722 


SSIS icieiee pata 


003732 
007724 
170702 
003714 
170672 


003726 


0-0 2b ~ 6-= b= &-+ 6 +6 -- p+ p- 


0D NOU £ WIT O 


so Be bh he he he = oe a Be ho Oe Os 0 he be 8s b+ bs Fo oo 0 Fo be bo he he Bo Fs bo ho Fo = 2 b= 9 = f= fo fo hs 9 Bo pepe Pepe 
@DB@MoOwwamMmowwoqnm 


SERRE OS BOUT ORS 
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MOV #20 aTOBR sOUTPUT A SPACE 
an aes ESE Ape coe th 
iS i ae te POR ENB OF CINE” 

iPRINT SINGLE BA pESULTS 

FLY TST ADDR DONE 
CLRB = JADCSR ith Hap LOW BYTE OF CSR 
ISR %7, SET ioe UP GAIN AND CHANNEL 
MOV ct eet, aADCSR 55 aR CONVERSION 
1318 SAQCSR’ ‘WAIT FOR DONE 
MOV DBR, R2 SULT INTO R 
BR sb gr BRIT RESULT AND Fort OVER 

;ROUTINE TO LOOP THRU A SINGLE onTutten TEST 

LOAD THE START ING SS OF THE TES! 

*YOU WISH TO RUN (THE ADDRESS OF THE TESTXX 

s TAG) AT THE 1ST HALT. SET SWITCH REGISTER 

“OPTIONS AT THE 2ND HALT. 

“NOTE THAT SW11 MUST BE DOWN AFTER THE 2ND HALT 

Testx: A ol hind :MALT FOR STARTI 5 
MOV SR, RETRNX ; LOAD STAR BRTING ANeRE Se Fa RE 
ROD #2; RETRNX ADD 2 9, POINT TO ERETRUCTION AFTER SCOPE 
ork SCOPEF ra Me RouNT T ZERO 
MOV #XLOOP, RETURN ib C OOP RETURN POINTER 
IMP BRE TRNK 0 TES 

XLOOP: CLR COPEF *KEEP COUNT AT ZERO 


JMP @RETRNX ;JUMP TO TEST 


spent TEST cS Th HREE HINES AT THE cy 
of HANNEL (BITS 05-00) AND GAIN (BITS 07-06) 
Be - SET Prick — 
; SWITCH is GIST TIONS 


_— cae AVERAGING “HEE PORMING Pra TABLE 


=i OR UP-=- nT ft INITIAL TALE 


pe ae 
THE. TEST STORES AN mi. Petit, Fac cHanne WHICH IF 
Fear ac Hn a eon as 


i the GP 
ae a SON ITH NTRELE 





a 


eeee ee we oe Oe oe ee oe 
w 
— 
r= 
nz 
o3 


a we ee ee ee 
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1839 
1940 
1841 
1842 
RS gare mee 
| T&¥e Dossde Sovze? 
1846 007746 016767 
1847 007754 000060 
1648 OU75E 016767 
B49 007764 0267 
B50 007772 100403 
851 007774 012767 
one 
O00 
D012 O00 
00149 01676 
Ooee 018767 
004767 
Boag Oez7e? 
D046 105267 
0052 008367 
| Dose | 00sse4 
| 
BoeS 1 
| Oe DON767 
B76 bOa767 
102 012767 
19 918709 


OOOXMOOV00000000 


Po - ooh — b+ = d-dh + = Pe 


ZIFREVFHSEREST 


—— 
£vo 


= 2 Be Oe Oh 2 Ba Bs Be Be 2 Be Bo bh OF 8 Oo bo Be ee 0 he 0 Fo he a po = fo hh po he 
~“N 


SERA BES SERENE Bod tod Suncom Ue TORE eae UMNe 


OOOOOOOOOOOSO OOO OOOO OOOOOO DO OOO OOO D0000000000 


O=- > -& < b= b— b= b= &- & + B= 8 6 = B— > + - = 8 - O- &= - O- = + >< = bb = = bb = = P= bb = 9 9 fh pp 
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170646 


170640 
000101 


170622 
167556 
001172 

175740 


175722 


001110 


167436 


167410 


000010 


1703S2 


WASIS: 


WSTART: 


WLOOP1: 


WCONTI1: 
WCONT2: 


WAGON: 
WAGAIN: 


WLOOPY:; 


;AND THE PROCESS IS REPEATED. 


F ITABLE AND NTABLE IS 
OF BELL IS RUNG aed 
JSR %7 , SETUP 

HALT 

JSR %.7, SET 

MOV SELECT, INITCH 

HALT 

MOV SR, NUMCH 

CHP NUACH, #6S. 

MOV ie, , NUMCH 

HALT 

BI #2000, SR 

BNE CONT! 

my ede 

JSR % TCONVAT 

ms eee 
INCB ge chet 

DE WCOUNT 

BG ML OOP 

Ry TREE po 

wv aot? 

% 

a oe 

Men Cerone 

MOV #OTABLE,RS 

BR 


JO3 





A COMPARISON 
pas RLLOLS peyFT TO GE CHECKED. 


WHENEVER SW6 IS SET, 
PRI! NTED OU 

EVERY 4096 bop 
s INITIALI GISTER 
WAIT FOF. ain aba CHANNEL AND GAIN 
STORE INI CHANNEL AND GAIN 
;WAIT FOR NUMBER OF CHANNELS 


pi TOO LARGE A CHANNEL COUNT 
ieee Sh FOR 18, OPTIONS 

; BRANCH ‘ hae TO INHIBIT AVERAGING 

iT OAD Feat PQIN 

ct Neel AT GIVEN CHANNEL AND GAIN 
Saraome nme 
Beane trie "itt H FPNGLE CONVERSION 


;LOAD OTABLE WITH SINGLE CONVERSIONS 


; INITIALIZE COUNTER 
;LOAD NTABLE WITH SINGLE CONVERSIONS 


tac a a C eae NEW DATA TO 


BATA INSTE PREVIOUS DATA 
HINITIALIZE ¢ 
CK 
IF NOT SET 
F aT a ISONS IN A ROW ON EACH CHANNEL 


e LOROING INITIAL CHANNEL 


au 


ve PRINTOUT IF WRONG 


et geer owe. 
boe 


777+ ee @e @e oe ae ee er ee ee oenued"» the heemne we 


SS ———— 
TT 
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PL WCONT IF DONE, RETURN TO MAIN 
183 bi oSeq Apeoe 000736 CLA CONCN CLEAR CONVERSION CO 
1897 Ol TSI (RO)+ :M NTER I T NEW "PAT 
183g Binses poeree rey ERR} MOVE POINTER TO OLb BAT 
1 g10268 105677 170316 ince aROCSRE TART ooh Sie ey I INCREMENTING CHANNEL NUMBER 
i 1 .+ ; 
WOONV: INC JAOCSR :START CONVE 
ia RES iE ee 
a8 bis06 o37718 170300 HOV sAboge, aro ;LOAD DATA INTO NEW TABLE 
Spe 510306 011003 WLOOP2: MOV 3RO,R :L080 DATA FROM NTABLE 
1307 010310 161503 oe: aRS/R i SUB TRACT OLD 
1908 Gist? ob 001074 of Xe dc ‘COMPARE V RLUE "Pt PRINTOUT IF WRONG 
i316 b10326 788 - Tet &R St MOVE. POINT TER TO OLD DATA 
1911 13e0 Spece 0666 
0008 7027 T, K FOR END OMPARI 
HB Rees tear PORES aero ER ren SE RO SSRIS ey cope 
1914 O1 b59 BR WLOOP COMPARE VALUES FOR NEX 
1915 010340 7? 000100 167222 WCONT3: BIT #100,SR i Ck Oil BF 6 FOR. PRINTOUT OF ITABLE AND NTABLE 
J %7 ,WPRINT PRINT OUT COMPARISON OF ITABLE AND NTABLE 
iat bib sen ieae eat MOV sOTABLE, RO TOAD POT TO MOVE ae 
| 1918 010360 O1 WLOOP3: MOV 200(R0) (RO)+  ;MOVE NT NTO OTABLE 
1920 Bi 4 11014 CMP #NTABLE *CHECK F BOLE CT MOVED 
| 1881 010370 001 BNE LOOPS {LOOP IF NOT DONE 
HBS BRE forage cmeee RP 
| 3984 Of 167 177504 INP WAGAIN sCONTINE. WI Test SF IF DONE HERE 
| 135P Bi4i0 Boa ? 1 PSGee ieeon :CONTI wage - IS TEST 
1927 10414 po9909 ITABLE: 0 on 
1983 010614 noo000 OTABLE: 0 “a. 
| 1931 011014 o0 TABLE: 6° 
HS aha am 
| 1935 11220 o0c900 : 
| TA 
ee PARLE One e NEHRU Aint Aa ueUS HT 
1933 O11z 026727 167376 oooinr ; PREVEN if LEGAL NUNGE OF CHANNELS 
14) O11 1 00% 167364 sSRANGH J R CHANNELS, TO 6M 
Siete pe ue & _ om. vive 
: SET PR oni T ? 
tgue ii 4 16651 atte at : | ; farus SUBROUTINE 
ise giles ter Ie ie Tiel amcen | 
7 T : WNITIAL CHANNE 
teu8 ii tle ' rez No 7 anbcsre Hla Rin ots AND CLEAR ERROR 
1950 O113i2 52711 i B #100, iP 


poet 
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1ge¢ 11328 Dobre? 
011326 


1953 O11 ha 
Bie 
| 1957 011336 Bizreg 
1ée8 BITE BbSaRE 
1960 O1135C 005267 
1961 011354 116777 
ie ies Gr 
igea Bitsea DosCa7 
ior aia 105031 
| $83 BRO Brce 
; 1968 011404 9000207 
{ 1989 011406 000000 
1970 011410 o00000 
1323 
| 135 
| 1874 Q11412 032767 
| 1975 Bits re 
1278 11422 7 
ms ao 011424 001 
_ 2978 011426 000207 
197§ 911430 005203 
1980 Bag 1004 
198i Oi14 lée2 
1982 O1]440 10000! 
ions Oil44e 000207 
l 
, 1985 
, 1986 
1989 Bi ites B5T48i 
1989 tae Bohan? 
iaat tite 01 
ia ii HR 
1993 0114 
1994 011474 
1939S 011500 
1996 011504 
1997 011510 
1998 911514 
oa ll 1 
1} 
Hes Bur 
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ese 10s 
tides 
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000340 166452 


167242 
000042 
0032 
6 
aE 
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167224 
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166116 


LTESRV: 


LTBDON: 


CHOUT: 
LCOUNT: 


WMSG: 


BR 


; 


S 


RT 


tits 


gsgEnesys 


Oou 
2325 


DA 
~ 
w 


LOS 


#340, PSR 


An | 
dADCSR 
+4 


JADDBR, (RO) + 
LCOUNT 


L 


CHOUT 

CHOUT , JADCSRB 
#1 
ae 


ON 


32, JINTVC 
iS 


cs 
(SP)+ 
(SP)+,PSR 
47 


iSFT PROCESSOR PRIORITY TO ZERO 


ih 


ii 


arenes NUMBER 


REANCE 


RSION have ERROR IF SET 
TATERRUP ne 


;CLEAR as 


ims 


K COMPARISON OF NT. 


jfeSuLY OF Ste icity 3 IN 


3 WHEN C 


STORE PSR 


£ en? OTABLE DATA AND PRINTOUT 


“CHECK FOR INHIBITING + OR - 1 LSB 
F NOT SET 


ST f3 FOR ZERO IF SET 
i +e TF Ok PRINTOUT ERROR MESSAGE 
ET 
; CHECK é: et 
BRANCH TO ERROR MESSAGE IF <-1 
;CHECK FOR >41 


;BRANCH TO ERROR MESSAGE IF >+} 
;RETURN 


; PRINTOUT YrS-TS MESSAGE FOR ONE PAIR OF CONVERSIONS 
#20000 


; CHECK SU13 or 
Tae NAISTT. PRINTOUT IF SET 


;CALCULATE CHANNEL NUMBER 


;PRINT CHANNEL NUMBER IN OCTAL 


;"WAS “ 
08D 
INT 


as 


PRINT 


D_DATA 
T OLD DATA 


MSU NEW NEW DATA 


es ee ee ee 
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DZAD 
2007 : PRINT OUT COMPARISON OF INITIAL TASLE AND NEW TABLE 
2008 O1154% O12702 014235 WPRINT: MOV aiid u Re sPRINT HEADING 
2009 011552 OO476? 002236 ISR 
010 011556 g12700 010414 MOV Si tAeLe RO sLOAD POINTER 
ll O11&2 016705 1e7034 MOV INITCH, RS ‘CALCULATE CHANNEL NUMBER 
ole 011566 000305 SWAB =saRS 
| 2013 O11 942795 177700 BIC #177700, RS :RS CONTAINS FIRST CHANNEL NUMBER 
2014 g1ie¢4 016767 167064 177412 MOV NUMCH, WOOUNT LOAD © TER 
20i5 O11802 004767 174436 WPLOOP: JSR %7, CRLF s OUTPUT ASRRBIAGE RETURN AND LINE FEED 
2016 O11 O! MOV RS’ Re NUMBER 
gol? 31161 ¢ R aie ha NUMBER 
18 O11612 004 001554 SR %? , PROCT NUMBER 
201$ 011616 012767 OO0006 174416 MOV #6; SPACEX 
2020 ibe 7? 174362 JSR %7 | SPACE 
bel ll il MOV othe OUT INITIAL VALUE 
| 11632 767 001534 JSR %7 , PROCT 
| p023 011636 012767 OO0006 174376 MOV #6, SPACEX ;SPACE OVER 
| 2024 O11644 77 174342 JSR %7' SPACE 
| $025 Qiieso O160%e Soowog MOV 4gd(RO) R2 sLOAD NEW VALUE 
| 0c 11654 004767 O01! JSR “7, PROCT 
11660 005720 TST (RO)+ sHOVE Par POINTER 
| §pge Oi Ieee ppaaa, 17728 Bt WSC DOP SUD IPCNOT DONE 
| 2030 TIES BOaEC> - nm © LOOP 
2032 ;ROUTINE TO TEST PEATABIL TY TO SPECIFICATIONS 
2033 :phib=t CAUSES PRINTOUT OF DISTRIBUTION 
Sw721 CAUSES DISTRI Ion 0 BE PRINTED ONLY WHEN A FAILURE occurs 
672 012706 0006 SIGIAL: HOY” BSTACK, 6 
004767 166730 ISR “7, SET TUP 
a HALT ;SET FIRST CHANNEL TO BE TESTED 


Bdde77 IN TCH sCLEAR ERR ERROR fe sale REL 10 BE TESTED 


30% Ne FoR ST Rc AVERAGE VALUE 
nba oS 
OE SE ITE, cove 


SULTS AND ST IN AV 


2ege: 
Be R 
ae Ee 
8? 
33E2S 
<< oS 


MOV 
SIGMA2: CL 


1S 


MOV 


Os 0 0 0 0 te 


WegsRensesas 
88 8: 
a8 8 
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8 
core 


oe 
Be 


SE 





SST ? 
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0— 0 & = b= B89 » + B+ & = = b= OB 0 8 9 8 + - - © OH 


RURBESeeTS SSR 


166540 SILOOP: LER Biviencto 
iFeee | T  aAOCSR ; 

raat I :- ‘Tere tUAIT F 

ool bi 166524 000752 MOV ; RESULT  ;STORE RESULT 

2 166767 OOO742 000744 SUB AV, RESULT : SUBTRACT AVERAGE 





me a ee ee ee ee ee + oe 
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%7. TOUT 
ECT+1 ,Fe ne CHANNEL # 
Aga! 

173636 SIGMAS: aib, CT ;SET GAIN TO xB 


¥ 
CLR 
omseo Pear yap eaves ag ut oF Ses 


3 012070 026727 000740 ocoD0i- - CMP RESULT, #1 sCHECK FOR ofESuLt ONE GREATER THAN AVERAGE 
2 reas SbDeS 000732 ONE BVER. ieee RECORD TT 
( 
eee at e3 ? x i SYENT Hea Pe NAS BEEN CATEGORIZED 
lek 6727 OCO722 177777 SICK1: CMP RESULT, #-1 ; CHECK FOR RESULT 0 E LESS THAN AVERAGE 
2068 012114 001003 BNE SICKe :NOPE=GO ON 
2069 Oiellé S267 O00716 : INC UNDER YES, RECORD IT 
2070 Olete 410 BR SICNTE ‘RESULT HAS BEEN CATEGORIZED 
2071 Olele4 005767 000704 SICK2: TST RESULT 
Me: diel Ooi4 - BEQ SICNTY :RESULT EQUALS AVERAGE 
9 lelse 005267 000704 INC OUT ?RESULT OUTSIDE LIMITS-COUNT IT 
ci Gis BESS orp = gros: he Fu 
Soo sti BE SES an ICNTB: hee ERMC ;10,000 CONVERSIONS COMPLETED? 
2977 012150 001333 BNE SILOOP ~ $NO=CONTINUE 
2078 2152 O16 0006 MOV OVER Re :CHECK FOR 2ND ALLOWED STATE 
2156 166702 O006 SUB UNDER 
eced Oleié2 100004. BPL —s SCNT ;BRANCH IF_AV+1 IS 2ND ALLOWED STATE 
2081 eigy Ob6/67 00064 o00650 ADD OVER, OUT :OUT IS TOTAL OUTSIDE OF 2 STATES 
83 154 ? GO064O SICNT! Br S1Ck3 T sBRANCH TO CHECK heb B STATE . 
eos peeree ant 16536 Siler BI DSR” sBy+i JS eno BLL OWED 
001402 BEQ 46 > 
Shee OeoES vanes o00b22 aap af ie ;TOO MANY OUT OF RANGE? 
| §pBe 100416 SMT oUt fe ND, GO. to GAIN OF 8 TEST 
2089 105767 165336 S18 oR YES-CHE 
spar 000264 BER a PRINTY Pare thao 
04 SICNT7: HLT sE AL URE T GAjy OF 
1 3214 MOV ansG Re 
2095 
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2098 
2099 
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5 16711 1SeEFs ” MOV T, @ADCSR pte: ONVERSION 

2105 ie 1 1318 GAQCSR :HAIT FOR DONE 

Bg flees cre WSR GBB BARI! LEIBA cmon on - 1 
1 141 BEQ SCNT 

119 727? OOO460 C0000! MP st ol 

il ) 0 N 

ile 72? OOOMSC 177777 i SULT, td 

114 ODO44e NC Gut IF IT IS NOT, INCREMENT COUNTER 
i a ne an oe 

tte 1343 : BFE ILOP1 IF NOT DONE WITH , LOOP 
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POR oS ER SSO VPRO 55 AES 
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000100 165152 git #100, 5R sCHECK FOR PRINT SWITCH 
000260 ISR “7 PRINTS 
00412 ooo41s CHP Out, ALLOWS :TOO MANY OL’? OF RANGE? 
BMI SIChT3 "NO. GO TEST NEXT CHANNEL 
165130 TSTB = SR YES=CHECK SW 7 
SPL SICNTS “NOT SET-SKIP NEXT 
000236 JSR 47, PRINTS :SET-PRINT DISTRIBUTION 
SICNTB: HLT ‘FAILURE AT GAIN OF 8 
013214 MOV aMSGI,Re 2" OH 
13 JSR %7,T0 
73443 MOVB  SELECT+1.Re sPRINT CHANNEL 8 
=e JSR %?  PRSHRT 
36 SICNT3: INC CHENT :COUNT CHANNELS TESTES 
000332 166122 CMP CHCNT. NUMCH “CHECK FOR ALL CHANNELS TESTED 
BMr = SAMNXT rIF NOT ALL TESTED, GO TO NEXT CHANNEL 
173620 ISR 47, BELL ‘RING BELL IF ALL TESTED 
17724 IMP SIGne “RUN TEST AGAIN 
17340 SAMNXT: INCB SELECT+ ‘CHANGE CHANNEL NUMBER 
177242 IMP SIGMA LOOP 
020000 165036 PRINTY: BIT 820000, SR 
BEQ +4 
RTS 4? 
013052 MOV 8MSGA, %2 
001246 JSR TOUT 
173355 MOVE SELECT+1,Re 
i770 ic 8177740, Re 
%? PRSHRT 
3073 MOV 8MSGB, Re 
1 JSR “7, TOUT 
MOV "Re 
ie eg 
BS 16 JSR “7 ath 
900220 MOV OVER, Re 
ISR %7, PRSHRT 


25 MOV aMSGE. Re 
ppbies ny COUt RE 
boo4e0 J %.7 .PRSHRT 

131 MOV Re 
001122 J %7. TOUT 

146 MOV 
000440 ER 4.7, PRSHRT 
020000 164656 PRINTS: BI #20000, SR 

BEQ +4 
RTS “47 
3147 V #MSGG, Re 
1066 JSR %7 TOUT 
173175 MOVE  SELECT+1,Re 
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Pll 

O1e732 O4e702 177740 » — See #177740, Re 

Qt ? bo4767 90 400 ISR %7 PRSHRT 

lev42 Ole 12073 MOV aneca Ae 

dle O04 7b 501 9%2 SR TOUT 

Ole pers 000360 JSR AR 

012762 912708 0131 MOV aMSGH, R2 

O01 00102 %7 TOUT 

01 ls 4g may EQUAL. Re 

01 004767 0 ISR v7. PRSHRT 

013002 O1e702 O131es MOV SCE, 

glam Flere: Gate eC 

013016 oes ooo JSR %7 , PRSHRT 

013022 000207 RTS “7 

0130204 O23420 SAMSIZ: 23420 :10,000 DECIMAL 
0i3026 000000 SamMcnT: 6 

013030 900000 AV: 6 

pt 3034 Goooee Sent: 

Ee haved OVER: 6 

O01 00000 UNDER: 0 

013042 000000 CUT: Oo 

pte Boooee nee 53541 DECIMAL 
51 3008 neat ALLOWS: 44 35+ DECIMAL 
013052 040057 3500 O44SO1 MSGA:  .ASCII ;/daGAIN OF 4,CH’7 

1 20116 117 932040 

13065 O41 110 0s? 

13073 057 040500 036526 MSGB: .ASCII ;/@AVs /; 

613102 05311? OS1105 MSGC: .ASCII ;/90VER= /; 

piatig 052500 O42116 MSGD: .ASCII ;/QUNDER= / 

013120 OSi10S 20075 057 

EE ne OS2125 MSGE: .ASCII ;/a0UT= / 

131 04 OS2521 MSGF: .ASCII ;/@EQUAL= /; 

O13iMe o¥e101 057 

91314 1 940507 MSGG: .ASCII ;/daGAIN OF 8,CH /; 
13154 O4711 10 

b13179 124 MSGH: .ASCII ;/@WITHIN 3 STATES= /; 
13176 047111 O31440 OS1440 

ot 042524 036523 

132i2 027440 

013214 O200S7 O44103 O27440 MSGI: .ASCII ;/ CH/; 


ENTER WITH SYSTEM TRAP a 
ant re E at we er ug REGISTER 


013222 036727 164342 o20000 PRINT TEST FOR INATBIT PRINT OUT 
12620 bO14OL BEQ +4 

1 } BR CK 18 Eth 

13234 012667 000076 MOV (6)+,  SAVPC Cine ROUT 
13040 Ole667 000074 MOV (6)+,  SAVPSR 

013244 Ce4e4e CMP -(6)' =(6) sPOR OF ER 


| po4 
| MAIN. MACYLL 276732) 23-MAR-76 10:53 FACE 42 
| 628088.P11 
| 2231 013246 047 ? 173772 Jk "2, CRE sQUTPUT CARRIAGE RETURN AND LINE FEED 
| SESS Rises g1582 | Gobnes NOV «SAUPC, a” TCORB REGISTER WITH FAILING PC+2 
| S53¢ Oj Toere> Teese2 ac its a te a  RERCY 
| S532 Giases 1bgs0s ; SPL 
Be a ee pee ee 
5538 bt 335e pees JSR “2, PROC : PRINT PROCESSOR STATUS 
2ev0 013312 16702 O00? 7 MOV 6=s-sSAR2, v2 “RESTORE R 
| Be) DISSIE OOS7E7 ibHeNE cx: Ist &R i CHECK SR FOR “HEL SWITCH 
! 100001 BPL "+4 ; BRANCH IF N 1 SET 
2243 013324 HALT HALT ON ERROR 
2e44 613326 RTT TRETURN TO MAIN UP INE 
,; e&%S Q2 SAVRe: Q 
2246 013332 900900 SAVRS: 6 
| Bex? 013334 o00000 SAVRG: 0 
| Be4B8 013336 900000 Savec: 
| 2249 013340 000000 SAVPSR: 0 
552 ; SUBROUTINE TO PRINT OUT OCTAL NUMBER 
| Bese PRSHRT DELETES LEADING ZEROS 
2253 -PROCT PRINTS OUT & OCTAL DIGITS 
2254 13342 012767 000001 000206 FPRSHRT: MOV #1, PRSFLG ;SET FLAG. TO INDICATE SHORT PRINTOUT 
2256 i 00 ate PROCT#H acre cK FOR F NO aero 
5567 Bt 325 eters 165234 Rete aTCSR ‘WAIT F hy 
2258 013360 BPL <4 
ees3 913362 O01 000260 165226 MOV #260, 2TDBR OUTPUT A SINGLE ZERO 
013370 RTS ed : RETURN 
226 ol 605067 0001 PROCT: CLR  PRSFLG CLEAR FLAG TO INDICATE FULL PRINTOUT 
l 010367 1777 MOV  —«-R3, SAYR3 :SAVE REGISTERS 
01 010467 177726 MOV st SAVY 
eb 1 cLR XM CLEAR RY FOR COUNTI CHARACTERS OUTPUT 
1341 7 000144 CCR - PRFLG sINETIALIZE ¢ Y FLAG FOR ROTATES 
200k 14 012703 000260 HOV #260, "3 4 =e t 
S5ee pi suse 108001 ,* 1S, if beep Nunee 
coon nies fot — a LEFT Re Oe TO RIGHT ENO 
soot aE edt 4 - 
ve 5 Bpolid p.ck: fet PREFE E FOR SHORT PRINTOUT 
Ae a et 
ge 000260 cH 73 wt #260 CHECK FOR tay ~s 
es7e pt Sues rea 165136 ~ P.WAIT: rE atcsR HAIR erOR ory Rea 
55 ¢ aes o183r8 Ane Pane XT CHARACT 
5505 Oi 5 Apaiee Crk OPREFLG our REST OF NUMBER AFTER A NON-ZERO DIGIT 
2281 Ol P.CONT: INC x4 
| ooco0E cp “4 a6 t CHECK FOR DONE 
i 1 +14 *BR F NOT DONE 
1 016703 177626 MOV  SAVR3, R3 RESTORE REGISTERS 
eee 13504 O1 177624 MOV —s- SAVY? x4 
2266 013510 000207 RTS ; ; RETURN 


ee ee 2 eee ee ee nee 
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2287 013512 000241 cLe CLEAR CARRY 
e288 1514 O05; > gooo40 TST PRELG t CHECK FOR PREVIOUS CARRY 
} 1403 REQ +10 ‘BRANCH IF PREVIOUSLY ZERO 
e230 13522 ? 900032 CLR PRFLG INITIALIZE FL LAG 
291 0135 1 SEC SET CARRY 
2292 Ol 102 ROL “2 :ROTATE NEXT CHARACTER INTC RIGHT END OF REGISTER 
2293 O01 102 ROL “eo 
O} 10 “a 
Pe HES fe mos mg BET a 
se36 et piosR8 i BIC si37770,3 skp een TR INTO 3 OCTAL DIGIT 
2298 013550 bse703 000260 BIS #260, °%3 ‘EEE TO Abe CH EQUIVALENT 
2295 013554 0007 SR P.CK LOOP 
2300 013556 990000 PRSFLG: 0 
e301 013560 000000 PRFLG: 0 
e303 -SCOPE AND/OR ITERATION LOOP FOR EACH TEST 4000 TIMES 
304 013562 7 o4o000 164000 SCOPEC: BIT : ;TEST SR FOR SCOPE 
2305 013570 001012 BNE SCOPER YES 
2306 013572 ? 004000 163770 BIT #4000 SR *NO-TEST FOR ITERATION 
2307 ot 901913 BNE OPES sNMIBTT ETeRaY ON 
2308 O01 767 000036 000032 C SCOPEF, ICOUNT COUNT TO MAX NUMBER 
2309 013610 160007 BPL SCOPEG sEXIT- 
e210 13ele 7 00026 ING SCOPEF REMENT C 
2311 0136! SCOPEB: CMP (6)+, %6 tA eoe ION one ACK 
2312 013620 O12667 164152 MOV (6)+' PSR i RESTORE PREVIOUS PROCESSOR STATUS 
ezi3 01 3be4 900177 1 JMP ORE TURN ;REPEAT TES 
14 Ol ? l SCOPEG: CR SCOPEF :CLEAR COUNT 
2315 013634 O11667 000006 a%, RETURN Reon SCOPE RETURN POINTER 
ezi6 136 900002 URN INLINE-NEXT TEST 
3} tSEaq oe sCOPer: a0 TTeRaT20N COUNT TERATION LOOP 
e318 Bi sede 001 RETURN: PesTiee Saat OF LAST $4 
2321 TRACE SUBROUTINE TO PRINT OUT LOCATION COUNTER OF EACH 
5355 7? 000001 163712 isa a at ee oe 
ey Baia oom.“ 
325 RT 
163700 I #2,SR 
367 413 Q TREI 
367 000106 S TRENT 
3676 001 BNE RCe 
7 000012 000076 HOV el2, | TRCNT 
1 TRC2: bee TRCNT 
14 001 TRC} 
371 00 ATI 


000070 
ae TROL: hoy s Teavee 


aera 
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164630 


0014 
000012 
000010 


TSTB aT¢SR 
MOV TSAVRe, Re 

TSAVRS, R 
MOV TSAVRY, %4 


s MESSAGE SUBROUTINE 

0 USE 
alee ISR x7, 
BIcB’ 


MOVE RODRESS OF MESSAGE TO REGISTER 2 
10097 aTCSR ;CLR_INT FLAG 
ae, A. EOMK sNOVE IN EOM MARKER 
Ni INC a%2, A. EOMK °C FoR Eon 

BNE +4 ‘BRANCH IF NOT END OF MESSAGE 

RTS 47 :RETURN IF 

CMPB «x2, #9 i CHECK FOR ER LF REQUEST 

BNE +10 H IF NOt 

ISR %7, CRLF OUTPUT CARRIAGE RETURN, LINEFEED 
A. INC inet CHARACTER 

STB OTCSR WAIT FOR TTY 

MOVB  (2)+, 3TDBR eure NEXT CHARACTER 

ER a. TOUT : CONTINUE 


-ASCII ;/@AN EXTERNAL TRIGGER SIGNAL OCCURRED@/; 


-ASCII ;/aBIT 2 SET CAUSES AN INTERRUPT AT LEVEL /; 


i334, ;/OCH/; 

-ASCII 37 WAS 7; 

-ASCII 37, IS 7; 

«ASCII ;7@9CHANNEL INITIAL VALUE NEW VALUE/; 


pa ee te ee ee eee 
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| BG RSE 
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Bie HSS oti 
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be0L 7? O40S26 
047111 OSeS20 
0101 7520 


———— 8 (fle 
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fu 
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poe 
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“NIC 
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24 
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Sutera 


711 


MSCS: 


MSGS: 


MSG10: 


MSG11: 


MSG20: 


«ASCII 


-ASCITI 


-ASCII 


-ASCIT 


«ASCII 


re ee ~ ce eee oe oceene a a ce 
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;/MINPUT A POSITIVE VOLTAGE TO THE INITIAL CHANNEL’; 


;/OTHEN HIT ‘CONTINUE’ ON THE CONSOLE/; 


;/9INPUT A NEGATIVE VOLTAGLE TO THE INITIAL CHANNEL’; 


;/Q9DIFFERENTIAL GAIN NOT LINEAR WITHIN + OR -/; 


371 LSBa/; 
;Al72 LSBIA; 
3/ GAINS GRAINY GAIN2 GAINIA/; 


;/MEASURED /; 


;/@MAX OK /; 


;7QMIN OK /; 


;Al 1/4 LSBOA; 


(MAIN, MACYLL 27(732) 23-MAR-7& 10:53 PACE 4 
S2a088. P11 : os 


485 QUYTHO 2004 OSIS14 O4OICE 
sg ON74B 01 


END 
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62A088.P11 CROSS REFERENCE TABLE -- USER SYMBOLS 
aoes. 000802 
ROCSR =x000001 7147218 = 722s787* = 728740 
4 ¢ * hy * ono A 
sce BS BSS, «Ba Bre* Bd? 
! 0} 907 Si4e 915 916% 919 
gue 9447 SHES 9G 
988% 991* 997% 1000 1008* 1009% 
1050® 1060 1061* 1062 1066 107i 
139% ive 114Ge 11461151 11538 
1199 1210 1211 1233* 1234* 123 
28S «= 1289 §= 1290S s1e84e = 1295S): 1374% 
14eee 1490 1491 1603" 608% 1609 
bre geet 1683 1688 1698170 
1750® 1751 754% 1755 175 790% 
ee 1902 1947x130 «1354 138s e058 
a BR qe et 1 _ 
913 917 % 93 % 
117811811158 tel ely Ae 
leg? 138411 152 155 
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